backups/flake_env
1
0
Fork 0
mirror of https://git.sr.ht/~bryan_bennett/flake_env synced 2025-12-17 15:11:22 +01:00
Code Issues Projects Releases Packages Wiki Activity

Format with ocamlformat

Browse source
This commit is contained in:
Bryan Bennett 2024-01-08 15:40:13 -05:00
parent 5d0923569f
commit fa7b93e3da
No known key found for this signature in database
GPG key ID: EE149E4215408DE9
11 changed files with 298 additions and 206 deletions
Download patch file Download diff file Expand all files Collapse all files

27
tests/flake_env_test_versions.re
View file

@ -105,15 +105,24 @@ let test_extract_version_number_success = () => {
let test_extract_version_number_no_version = () => {
let result = Versions.extract_version_number("../tests/spit_gibberish.sh");
check_version("Versions", Error("Stdout did not contain a version number for `../tests/spit_gibberish.sh --version`"), result);
check_version(
"Versions",
Error(
"Stdout did not contain a version number for `../tests/spit_gibberish.sh --version`",
),
result,
);
};
let test_extract_version_number_nonexistent = () => {
let result = Versions.extract_version_number("nonexistent.sh");
check_version("Versions", Error("Failed executing 'nonexistent.sh'"), result);
check_version(
"Versions",
Error("Failed executing 'nonexistent.sh'"),
result,
);
};
// TODO: Test:
// * preflight_versions? impure, but m
let () =
@ -177,8 +186,16 @@ let () =
"extract_version_number",
[
test_case("success", `Quick, test_extract_version_number_success),
test_case("no version number", `Quick, test_extract_version_number_no_version),
test_case("missing binary", `Quick, test_extract_version_number_nonexistent),
test_case(
"no version number",
`Quick,
test_extract_version_number_no_version,
),
test_case(
"missing binary",
`Quick,
test_extract_version_number_nonexistent,
),
],
),
],