diff options
| author | 2021-01-08 20:57:26 -0600 | |
|---|---|---|
| committer | 2021-01-08 22:46:26 -0600 | |
| commit | 2660be875536f483e90d826fea34faaf6605a14b (patch) | |
| tree | 76ea25262eaa11192767a6a23106ff4ca735a530 /test | |
| parent | Handle empty tuple. (diff) | |
Add regex module to spork.
Diffstat (limited to 'test')
| -rw-r--r-- | test/suite0.janet | 4 | ||||
| -rw-r--r-- | test/suite1.janet | 4 | ||||
| -rw-r--r-- | test/suite2.janet | 4 | ||||
| -rw-r--r-- | test/suite3.janet | 4 | ||||
| -rw-r--r-- | test/suite4.janet | 16 |
5 files changed, 24 insertions, 8 deletions
diff --git a/test/suite0.janet b/test/suite0.janet index f5bf558..8f0a3b3 100644 --- a/test/suite0.janet +++ b/test/suite0.janet @@ -1,5 +1,5 @@ -(use test/helper) -(import spork/fmt) +(use ./helper) +(import ../spork/fmt) (start-suite 0) diff --git a/test/suite1.janet b/test/suite1.janet index 716d901..879057b 100644 --- a/test/suite1.janet +++ b/test/suite1.janet @@ -1,5 +1,5 @@ -(use test/helper) -(import spork/misc) +(use ./helper) +(import ../spork/misc) (start-suite 1) (assert (= (misc/dedent " a\n b\n c\n d") "a\n b\n c\n d") "dedent") diff --git a/test/suite2.janet b/test/suite2.janet index 7842163..6bd0894 100644 --- a/test/suite2.janet +++ b/test/suite2.janet @@ -1,5 +1,5 @@ -(use test/helper) -(import spork/rpc) +(use ./helper) +(import ../spork/rpc) (start-suite 2) diff --git a/test/suite3.janet b/test/suite3.janet index 1d6ac7c..9b845fa 100644 --- a/test/suite3.janet +++ b/test/suite3.janet @@ -1,5 +1,5 @@ -(use test/helper) -(import spork/msg) +(use ./helper) +(import ../spork/msg) (start-suite 3) diff --git a/test/suite4.janet b/test/suite4.janet new file mode 100644 index 0000000..68580df --- /dev/null +++ b/test/suite4.janet @@ -0,0 +1,16 @@ +(use ./helper) +(import ../spork/regex) + +(start-suite 4) + +(assert (regex/match `abc` `abcdefg`) "match 1") +(assert (regex/match `a.c` `azcdefg`) "match 2") +(assert (regex/match `a\s+c` `a cdefg`) "match 3") +(assert (not (regex/match `a\s+c` `acdefg`)) "match 4") + +(assert (regex/match `(?:abc){4}` "abcabcabcabc") "match 5") +(assert (deep= @["abc" "abc" "abc" "abc"] + (regex/match `(?:(abc)){4}` "abcabcabcabc")) + "match 6") + +(end-suite) |
