tvl-depot/users/sterni/nix/string/tests/default.nix
Vincent Ambo aa122cbae7 style: format entire depot with nixpkgs-fmt
This CL can be used to compare the style of nixpkgs-fmt against other
formatters (nixpkgs, alejandra).

Change-Id: I87c6abff6bcb546b02ead15ad0405f81e01b6d9e
Reviewed-on: https://cl.tvl.fyi/c/depot/+/4397
Tested-by: BuildkiteCI
Reviewed-by: sterni <sternenseemann@systemli.org>
Reviewed-by: lukegb <lukegb@tvl.fyi>
Reviewed-by: wpcarro <wpcarro@gmail.com>
Reviewed-by: Profpatsch <mail@profpatsch.de>
Reviewed-by: kanepyork <rikingcoding@gmail.com>
Reviewed-by: tazjin <tazjin@tvl.su>
Reviewed-by: cynthia <cynthia@tvl.fyi>
Reviewed-by: edef <edef@edef.eu>
Reviewed-by: eta <tvl@eta.st>
Reviewed-by: grfn <grfn@gws.fyi>
2022-01-31 16:11:53 +00:00

72 lines
1.4 KiB
Nix

{ depot, ... }:
let
inherit (depot.users.sterni.nix)
string
;
inherit (depot.nix.runTestsuite)
it
assertEq
runTestsuite
;
testTakeDrop = it "tests take and drop" [
(assertEq "take"
(string.take 5 "five and more")
"five ")
(assertEq "drop"
(string.drop 2 "coin")
"in")
(assertEq "take out of bounds"
(string.take 100 "foo")
"foo")
(assertEq "drop out of bounds"
(string.drop 42 "lol")
"")
];
testIndexing = it "tests string indexing" [
(assertEq "normal charAt"
(string.charAt 3 "helo")
"o")
(assertEq "out of bounds charAt"
(string.charAt 5 "helo")
null)
];
testFinding = it "tests finding in strings" [
(assertEq "normal charIndex"
(string.charIndex "d" "abcdefghijkl")
3)
(assertEq "charIndex no match"
(string.charIndex "w" "zZzZzzzZZZ")
null)
];
dontEval = builtins.throw "this should not get evaluated";
testMatch = it "tests match" [
(assertEq "basic match usage" 42
(string.match "answer" {
"answer" = 42;
"banana" = dontEval;
"maleur" = dontEval;
}))
];
f = "f";
testPrintf = it "prints f" [
(assertEq "basic %s usage" "print ${f}" (string.printf "print %s" f))
(assertEq "% escaping" "100%" (string.printf "100%%"))
];
in
runTestsuite "nix.string" [
testTakeDrop
testIndexing
testFinding
testMatch
testPrintf
]