aboutsummaryrefslogtreecommitdiff
path: root/stdlib/test
diff options
context:
space:
mode:
authorEduardo Julian2016-12-27 07:18:25 -0400
committerEduardo Julian2016-12-27 07:18:25 -0400
commitfdc924b023122b09b536a3d372658ecf15277cfb (patch)
treedb093548be6beb76983dbfca46f7994479633d1a /stdlib/test
parent4d2d4a1a1d9e40b2a628044382edb0f9cbfdbd9d (diff)
- Refactored lux/regex tests to avoid the "Truncate class file" issue.
Diffstat (limited to 'stdlib/test')
-rw-r--r--stdlib/test/test/lux/regex.lux8
1 files changed, 2 insertions, 6 deletions
diff --git a/stdlib/test/test/lux/regex.lux b/stdlib/test/test/lux/regex.lux
index b2a2b71b1..00be2c2d8 100644
--- a/stdlib/test/test/lux/regex.lux
+++ b/stdlib/test/test/lux/regex.lux
@@ -218,7 +218,7 @@
(should-fail (&;regex "a+") "")))
))
-(test: "Regular Expressions [Specific Quantifiers]"
+(test: "Regular Expressions [Crisp Quantifiers]"
($_ seq
(assert "Can match a pattern N times."
(and (should-passT "aa" (&;regex "a{2}") "aa")
@@ -264,11 +264,7 @@
(should-fail (&;regex "a|b") "c")))
(assert "Can have groups within alternations."
- (and (should-check ["abc" (+0 "b")] (&;regex "a(.)c|b(.)d") "abc")
- (should-check ["bcd" (+1 "c")] (&;regex "a(.)c|b(.)d") "bcd")
- (should-fail (&;regex "a(.)c|b(.)d") "cde")
-
- (should-check ["abc" (+0 ["b" "c"])] (&;regex "a(.)(.)|b(.)(.)") "abc")
+ (and (should-check ["abc" (+0 ["b" "c"])] (&;regex "a(.)(.)|b(.)(.)") "abc")
(should-check ["bcd" (+1 ["c" "d"])] (&;regex "a(.)(.)|b(.)(.)") "bcd")
(should-fail (&;regex "a(.)(.)|b(.)(.)") "cde")