summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAdrian Thurston <thurston@complang.org>2012-07-16 08:40:59 -0400
committerAdrian Thurston <thurston@complang.org>2012-07-16 08:40:59 -0400
commit8197dbc598378f0195de6c28d4c3edfebfbccfaf (patch)
tree4b4ec8eb6b5e888b3ff880c4008f601e4728e2d2
parentb78e265efd244fe3dcee35ea41811a434092c83d (diff)
downloadcolm-8197dbc598378f0195de6c28d4c3edfebfbccfaf.tar.gz
updated tests to match send (accum) syntax change
Must wrap items sent to a parser using [].
-rw-r--r--test/accum2.lm2
-rw-r--r--test/undofrag2.lm8
-rw-r--r--test/undofrag3.lm8
3 files changed, 9 insertions, 9 deletions
diff --git a/test/accum2.lm b/test/accum2.lm
index e1eac4d3..a94434e3 100644
--- a/test/accum2.lm
+++ b/test/accum2.lm
@@ -28,6 +28,6 @@ context ctx
cons SP: parser<ctx::start> []
SP.ctx = cons ctx []
-send SP stdin
+send SP [stdin]
Input: ctx::start = SP()
print( Input '\n' )
diff --git a/test/undofrag2.lm b/test/undofrag2.lm
index 7f852490..82a9a104 100644
--- a/test/undofrag2.lm
+++ b/test/undofrag2.lm
@@ -17,13 +17,13 @@ def out
def item
[id]
{
- send Out r1
+ send Out [r1]
}
| ['(' item* ')']
{
- send Out '('
- send Out r2
- send Out ')'
+ send Out ['(']
+ send Out [r2]
+ send Out [')']
}
def A1 []
diff --git a/test/undofrag3.lm b/test/undofrag3.lm
index dc89d537..3fbd7d2b 100644
--- a/test/undofrag3.lm
+++ b/test/undofrag3.lm
@@ -17,13 +17,13 @@ def out
def item
[id]
{
- send Out r1
+ send Out [r1]
}
| ['(' item* ')']
{
- send Out '('
- send Out r2
- send Out ')'
+ send Out ['(']
+ send Out [r2]
+ send Out [')']
}
def A1 []