3
0
Fork 0
forked from mirrors/nixpkgs

added simple lib test case for overridableDelayableArgs

svn path=/nixpkgs/trunk/; revision=14426
This commit is contained in:
Marc Weber 2009-03-06 23:21:17 +00:00
parent 5ddfa7ed64
commit f1183f33e3
3 changed files with 63 additions and 1 deletions

53
pkgs/lib/misc-tests.nix Normal file
View file

@ -0,0 +1,53 @@
let lib = import ./default.nix;
eqStrictTest =
let inherit(lib) eqStrict; in
assert eqStrict 2 2;
assert !(eqStrict 3 2);
assert eqStrict [2 1] [2 1];
assert !(eqStrict [1 3] [1 2]);
assert eqStrict {a = 7; b = 20;} {b= 20; a = 7;};
assert eqStrict [{a = 7; b = 20;}] [{b= 20; a = 7;}];
assert eqStrict {a = [7 8]; b = 20;} {b= 20; a = [7 8];};
"ok";
overridableDelayableArgsTest =
let inherit (lib) defaultOverridableDelayableArgs;
res1 = defaultOverridableDelayableArgs lib.id {};
res2 = defaultOverridableDelayableArgs lib.id { a = 7; };
res3 = let x = defaultOverridableDelayableArgs lib.id { a = 7; };
in (x.merge) { b = 10; };
res4 = let x = defaultOverridableDelayableArgs lib.id { a = 7; };
in (x.merge) ( x: { b = 10; });
res5 = let x = defaultOverridableDelayableArgs lib.id { a = 7; };
in (x.merge) ( x: { a = __add x.a 3; });
res6 = let x = defaultOverridableDelayableArgs lib.id { a = 7; mergeAttrBy = { a = __add; }; };
y = x.merge {};
in (y.merge) { a = 10; };
resRem7 = res6.replace (a : removeAttrs a ["a"]);
resReplace6 = let x = defaultOverridableDelayableArgs lib.id { a = 7; mergeAttrBy = { a = __add; }; };
x2 = x.merge { a = 20; }; # now we have 27
in (x2.replace) { a = 10; }; # and override the value by 10
# fixed tests (delayed args): (when using them add some comments, please)
resFixed1 =
let x = defaultOverridableDelayableArgs lib.id ( x : { a = 7; c = x.fixed.b; });
y = x.merge (x : { name = "name-${builtins.toString x.fixed.c}"; });
in (y.merge) { b = 10; };
strip = attrs : removeAttrs attrs ["merge" "replace"];
in
assert lib.eqStrict (strip res1) { };
assert lib.eqStrict (strip res2) { a = 7; };
assert lib.eqStrict (strip res3) { a = 7; b = 10; };
assert lib.eqStrict (strip res4) { a = 7; b = 10; };
assert lib.eqStrict (strip res5) { a = 10; };
assert lib.eqStrict (strip res6) { a = 17; };
assert lib.eqStrict (strip resRem7) {};
assert lib.eqStrict (strip resFixed1) { a = 7; b = 10; c =10; name = "name-10"; };
"ok";
in [ eqStrictTest overridableDelayableArgsTest ]

8
pkgs/lib/tests.nix Normal file
View file

@ -0,0 +1,8 @@
let lib = import ./default.nix;
miscTests = import ./misc-tests.nix;
in
if lib.all (a : a == "ok") (lib.concatLists [ miscTests ]) then
throw "all tests have passed"
else "there has been a some lib test failures"

View file

@ -34,7 +34,7 @@
let
lib = import ../lib;
lib = import ../lib; # see also libTests below
# The contents of the configuration file found at $NIXPKGS_CONFIG or
# $HOME/.nixpkgs/config.nix.
@ -9583,4 +9583,5 @@ let
inherit (stdenv) mkDerivation;
};
libTests = import ../lib/tests.nix;
}; in pkgs