aboutsummaryrefslogtreecommitdiff
path: root/stdlib/test
diff options
context:
space:
mode:
authorEduardo Julian2017-06-17 21:47:56 -0400
committerEduardo Julian2017-06-17 21:47:56 -0400
commite65917e3fe1b5794a2643058f15c7aeb5ca1a0fa (patch)
tree472c4c353ae42cca7be75bdbba9ede25cabac8c5 /stdlib/test
parent5bafba704f5e5b837b68bafbd02f22beaeafda02 (diff)
- Small refactorings and name-changes.
Diffstat (limited to 'stdlib/test')
-rw-r--r--stdlib/test/test/lux/macro/syntax.lux6
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/test/test/lux/macro/syntax.lux b/stdlib/test/test/lux/macro/syntax.lux
index 0badc67f3..9982dc01b 100644
--- a/stdlib/test/test/lux/macro/syntax.lux
+++ b/stdlib/test/test/lux/macro/syntax.lux
@@ -68,7 +68,7 @@
[(assert <assertion>
(and (is? <Eq> <value> <get> (list (<ctor> <value>)))
(found? (s;this? (<ctor> <value>)) (list (<ctor> <value>)))
- (enforced? (s;this! (<ctor> <value>)) (list (<ctor> <value>)))))]
+ (enforced? (s;this (<ctor> <value>)) (list (<ctor> <value>)))))]
["Can parse Bool syntax." true code;bool bool;Eq<Bool> s;bool]
["Can parse Nat syntax." +123 code;nat number;Eq<Nat> s;nat]
@@ -247,8 +247,8 @@
(assert "Can parse while taking separators into account."
(and (match (list 123 456 789)
(s;run (list (code;int 123) (code;text "YOLO") (code;int 456) (code;text "YOLO") (code;int 789))
- (s;sep-by (s;this! (' "YOLO")) s;int)))
+ (s;sep-by (s;this (' "YOLO")) s;int)))
(match (list 123 456)
(s;run (list (code;int 123) (code;text "YOLO") (code;int 456) (code;int 789))
- (s;sep-by (s;this! (' "YOLO")) s;int)))))
+ (s;sep-by (s;this (' "YOLO")) s;int)))))
))