about summary refs log tree commit diff
path: root/users/sterni/nix/string/tests/default.nix
blob: c8aec9464077d5e8aab7ca42ed26e3dae377b623 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
{ 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
  ]