summaryrefslogtreecommitdiff
path: root/test/undofrag1.lm
diff options
context:
space:
mode:
authorAdrian Thurston <thurston@complang.org>2011-09-16 16:15:05 +0000
committerAdrian Thurston <thurston@complang.org>2011-09-16 16:15:05 +0000
commitc62b05cc7a68368826ef56d272ab4c5cf7f90ce2 (patch)
tree0bab28fc5a906a4c5dcec6215d57194b1c2cee66 /test/undofrag1.lm
parent426aa99b90ba9a523772d329c2fb51af65663ed6 (diff)
downloadcolm-c62b05cc7a68368826ef56d272ab4c5cf7f90ce2.tar.gz
Added a syntax send Parser [Stuff], where send is now a keyword. Function
lookup now try applying a default function to the local objects. refs #322.
Diffstat (limited to 'test/undofrag1.lm')
-rw-r--r--test/undofrag1.lm14
1 files changed, 7 insertions, 7 deletions
diff --git a/test/undofrag1.lm b/test/undofrag1.lm
index 1316f336..2f2d4d04 100644
--- a/test/undofrag1.lm
+++ b/test/undofrag1.lm
@@ -12,7 +12,8 @@ def item2
def start2
[item2*]
-global SP: parser<start2> = cons parser<start2> []
+global SP: parser<start2> =
+ cons parser<start2> []
context ctx
{
@@ -30,26 +31,25 @@ context ctx
def A [] {
print( 'A\n' )
- SP << "{ A{d} }"
+ send SP "{ A{d} }"
}
def B [] {
print( 'B\n' )
- SP << "{ B{d} }"
+ send SP "{ B{d} }"
}
-
def start
[A item* '!']
| [B item* ';\n']
}
-SP << "a b{c}"
+send SP "a b{c}"
CTX: ctx = cons ctx []
Input: ctx::start = parse ctx::start( CTX stdin )
-SP << "{e}f g"
+send SP "{e}f g"
print( Input )
-print( SP.finish() '\n' )
+print( SP() '\n' )