diff options
| author | Eduardo Julian | 2017-06-17 21:47:56 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2017-06-17 21:47:56 -0400 |
| commit | e65917e3fe1b5794a2643058f15c7aeb5ca1a0fa (patch) | |
| tree | 472c4c353ae42cca7be75bdbba9ede25cabac8c5 /stdlib/test | |
| parent | 5bafba704f5e5b837b68bafbd02f22beaeafda02 (diff) | |
- Small refactorings and name-changes.
Diffstat (limited to '')
| -rw-r--r-- | stdlib/test/test/lux/macro/syntax.lux | 6 |
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))))) )) |