aboutsummaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rw-r--r--tests/collections.nom2
-rw-r--r--tests/control_flow.nom14
-rw-r--r--tests/math.nom2
-rw-r--r--tests/metaprogramming.nom2
-rw-r--r--tests/object.nom3
-rw-r--r--tests/operators.nom2
-rw-r--r--tests/scopes.nom29
-rw-r--r--tests/text.nom2
8 files changed, 19 insertions, 37 deletions
diff --git a/tests/collections.nom b/tests/collections.nom
index 4170d17..d08a20e 100644
--- a/tests/collections.nom
+++ b/tests/collections.nom
@@ -1,5 +1,5 @@
#..
- Tests for the stuff defined in lib/control_flow.nom
+ Tests for the stuff defined in core/control_flow.nom
use "core"
diff --git a/tests/control_flow.nom b/tests/control_flow.nom
index 20ccabe..238bcbf 100644
--- a/tests/control_flow.nom
+++ b/tests/control_flow.nom
@@ -1,5 +1,5 @@
#
- Tests for the stuff defined in lib/control_flow.nom
+ Tests for the stuff defined in core/control_flow.nom
use "core"
@@ -193,15 +193,3 @@ assume
return %n
..= 6
-#
- %nums <- []
- for % in
- values
- -> 4
- -> 5
- -> 6
- ..
- add % to %nums
-
- assume (%nums = [4,5,6]) or barf "Coroutine iteration failed"
-
diff --git a/tests/math.nom b/tests/math.nom
index 115354c..ffc0a2f 100644
--- a/tests/math.nom
+++ b/tests/math.nom
@@ -1,5 +1,5 @@
#..
- Tests for the stuff defined in lib/control_flow.nom
+ Tests for the stuff defined in core/control_flow.nom
use "core"
diff --git a/tests/metaprogramming.nom b/tests/metaprogramming.nom
index d5ef07f..af43269 100644
--- a/tests/metaprogramming.nom
+++ b/tests/metaprogramming.nom
@@ -1,5 +1,5 @@
#..
- Tests for the stuff defined in lib/metaprogramming.nom
+ Tests for the stuff defined in core/metaprogramming.nom
use "core"
diff --git a/tests/object.nom b/tests/object.nom
index 8ad5b82..b3e8164 100644
--- a/tests/object.nom
+++ b/tests/object.nom
@@ -1,3 +1,6 @@
+#
+ Tests for the object model defined in lib/object.nom
+
use "core"
use "lib/object.nom"
diff --git a/tests/operators.nom b/tests/operators.nom
index 2452ba5..7cdf964 100644
--- a/tests/operators.nom
+++ b/tests/operators.nom
@@ -1,5 +1,5 @@
#..
- Tests for the stuff defined in lib/operators.nom
+ Tests for the stuff defined in core/operators.nom
use "core"
diff --git a/tests/scopes.nom b/tests/scopes.nom
index d3a2eb9..b9d1f4f 100644
--- a/tests/scopes.nom
+++ b/tests/scopes.nom
@@ -1,25 +1,16 @@
use "core"
-using
- %x <- 99
-..do
- assume: %x = 99
+%x <- "outer"
+with local %x
+ %x <- "inner"
+ assume: %x = "inner"
+assume: %x = "outer"
-using
- action [foo]
- return 99
-
-..do
- assume: (foo) = 99
+action [foo] "outer foo"
+with local (foo)
+ action [foo] "inner foo"
+ assume: (foo) = "inner foo"
+assume: (foo) = "outer foo"
-action [baz]
- return "outer"
-
-#
- do
- local action [baz]
- return "inner"
- assume: (baz) = "inner"
- assume: (baz) = "outer"
say "Scopes test passed."
diff --git a/tests/text.nom b/tests/text.nom
index 600cce4..134fff2 100644
--- a/tests/text.nom
+++ b/tests/text.nom
@@ -1,5 +1,5 @@
#..
- Tests for the stuff defined in lib/text.nom
+ Tests for the stuff defined in core/text.nom
use "core"