Ignoring revisions in .git-blame-ignore-revs. Click here to bypass and see the normal blame view.
{ depot, ... }:
let
inherit (depot.nix.runTestsuite)
runTestsuite
it
assertEq
assertThrows
;
inherit (depot.users.sterni.nix.flow)
cond
match
dontEval = builtins.throw "this should not get evaluated";
testCond = it "tests cond" [
(assertThrows "malformed cond list"
(cond [ [ true 1 2 ] [ false 1 ] ]))
(assertEq "last is true" "last"
(cond [
[ false dontEval ]
[ true "last" ]
]))
(assertEq "first is true" 1
[ true 1 ]
[ true dontEval ]
];
in
runTestsuite "nix.flow" [
testCond
]