Skip to content

Add a benchmark for opam install #6912

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
kit-ty-kate merged 1 commit into from
Jul 13, 2026
Merged

Add a benchmark for opam install #6912

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
1 commit
Select commit
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
1 change: 1 addition & 0 deletions master_changes.md
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -174,6 +174,7 @@ users)

## Benchmarks
* Add an even larger real-world diff to benchmark `opam update` [#6567 @kit-ty-kate]
* Add a benchmark for `opam install` [#6912 @kit-ty-kate]

## Reftests
### Tests
Expand Down
43 changes: 43 additions & 0 deletions tests/bench/bench.ml
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -136,6 +136,37 @@ let () =
in
List.fold_left (+.) 0.0 l /. float_of_int n
in
let time_install_core =
Gc.compact ();
launch (fmt "%s switch create -y eight ocaml-base-compiler.4.14.0" bin);
launch (fmt "%s install --download-only -y core.v0.15.1" bin);
launch "test -d ~/.opam/eight/.opam-switch/sources && rm -rf ~/.opam/eight/.opam-switch/sources";
launch "test -d ~/.opam/eight/.opam-switch/build && rm -rf ~/.opam/eight/.opam-switch/build";
time_cmd ~exit:0 (fmt "%s install -y core.v0.15.1" bin)
Comment thread
kit-ty-kate marked this conversation as resolved.
in
let time_install_big =
Gc.compact ();
launch (fmt "%s switch create nine --empty" bin);
OpamSystem.write "/tmp/opam-bench-bigpkg/repo" {|opam-version: "2.0"
|};
OpamSystem.write "/tmp/opam-bench-bigpkg/packages/a.1/opam" {|opam-version: "2.0"
url {
src: "https://github.com/ocaml/opam-repository/archive/refs/tags/2025-01-before-archiving-phase1.tar.gz"
checksum: "md5=215a5261ad8358e34eb3222b83c4c8be"
}
|};
OpamSystem.write "/tmp/opam-bench-bigpkg/packages/b.1/opam" {|opam-version: "2.0"
build: ["rm" "-r" "packages"]
url {
src: "https://github.com/ocaml/opam-repository/archive/refs/tags/2025-01-before-archiving-phase1.tar.gz"
checksum: "md5=215a5261ad8358e34eb3222b83c4c8be"
}
|};
launch (fmt "%s repo add tmp /tmp/opam-bench-bigpkg" bin);
let res = time_cmd ~exit:0 (fmt "%s install a.1 b.1" bin) in
launch (fmt "%s repo remove tmp -a" bin);
res
in
let init_root tmp_root_dir repo =
launch (fmt "rm -rf %s" tmp_root_dir);
launch (fmt "mkdir -p %s" tmp_root_dir);
Expand Down Expand Up @@ -279,6 +310,16 @@ let () =
"name": "OpamStd.String.split amortised over 10 runs",
"value": %f,
"units": "secs"
},
{
"name": "opam install large-number-of-deps",
"value": %f,
"units": "secs"
},
{
"name": "opam install lot-io-source lot-io-source2",
"value": %f,
"units": "secs"
}
]
},
Expand Down Expand Up @@ -363,6 +404,8 @@ let () =
time_show_raw
time_show_precise
time_OpamStd_String_split_10
time_install_core
time_install_big
time_update_no_diff_local
time_update_no_diff_git
time_update_small_diff_local
Expand Down