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

Move version pprint into Version module

Browse source
This commit is contained in:
Bryan Bennett 2024-06-18 06:54:12 -04:00
parent 33aa9228e2
commit 081ed58524
No known key found for this signature in database
GPG key ID: EE149E4215408DE9
2 changed files with 5 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/flake_env__versions.re
View file

@ -9,8 +9,12 @@ type t = {
point: int, point: int,
}; };
/*** Initialize a Versions.t from major, minor, and point versions */
let init = (major, minor, point) => {major, minor, point}; let init = (major, minor, point) => {major, minor, point};
let pprint = (pp_fmt, t) =>
Format.fprintf(pp_fmt, "{ %d.%d.%d }", t.major, t.minor, t.point);
let required_direnv_version = init(2, 21, 3); let required_direnv_version = init(2, 21, 3);
let required_nix_version = init(2, 10, 0); let required_nix_version = init(2, 10, 0);

13
tests/flake_env_test_versions.re
View file

@ -1,18 +1,7 @@
open Lib; open Lib;
let pprint = (pp_fmt, version) => {
Versions.(
Fmt.pf(
pp_fmt,
"{ major: %d, minor: %d, point: %d }",
version.major,
version.minor,
version.point,
)
);
};
let testable_version = let testable_version =
Alcotest.testable(pprint, (a, b) => Versions.compare(a, b) == 0); Alcotest.testable(Versions.pprint, (a, b) => Versions.compare(a, b) == 0);
let check_version = let check_version =
Alcotest.(check(Alcotest.result(testable_version, string))); Alcotest.(check(Alcotest.result(testable_version, string)));