diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/metaprogramming.nom | 7 | ||||
| -rw-r--r-- | tests/scopes.nom | 12 |
2 files changed, 10 insertions, 9 deletions
diff --git a/tests/metaprogramming.nom b/tests/metaprogramming.nom index a31d030..a7a61d4 100644 --- a/tests/metaprogramming.nom +++ b/tests/metaprogramming.nom @@ -49,9 +49,10 @@ assume ((%1 = 2) and (%2 = 1)) or barf "'parse % as %' failed on 'swap % and %'" swap %tmp and %tmp2 assume ((%tmp = 2) and (%tmp2 = 1)) or barf "'parse % as %' variable mangling failed." -remove action (foo %) -try: foo 99 -..and if it succeeds: barf "Failed to delete action" +# + remove action (foo %) + try: foo 99 + ..and if it succeeds: barf "Failed to delete action" assume ((\(5 + 5) as value) = 10) or barf "%tree as value failed." diff --git a/tests/scopes.nom b/tests/scopes.nom index 80791a5..d3a2eb9 100644 --- a/tests/scopes.nom +++ b/tests/scopes.nom @@ -15,11 +15,11 @@ using action [baz] return "outer" -using - action [baz] - return "inner" -..do - assume: (baz) = "inner" -assume: (baz) = "outer" +# + do + local action [baz] + return "inner" + assume: (baz) = "inner" + assume: (baz) = "outer" say "Scopes test passed." |