Mercurial > ~dholland > hg > ag > index.cgi
diff tests/agcl/parsifal/test2.syn @ 0:13d2b8934445
Import AnaGram (near-)release tree into Mercurial.
author | David A. Holland |
---|---|
date | Sat, 22 Dec 2007 17:52:45 -0500 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/tests/agcl/parsifal/test2.syn Sat Dec 22 17:52:45 2007 -0500 @@ -0,0 +1,34 @@ +{ +#include <stdio.h> +} + +[ + event driven + distinguish keywords {'a-z' + 'A-Z' + '0-9'} +] + +line $ + -> "if", '(', ~(eol + '(')?..., eol =printf("if\n"); + -> "ifx",'(', ~(eol + '(')?..., eol =printf("ifx\n"); + -> other stuff, eol + +other stuff + -> ~eol:c =printf("%c", c); + -> other stuff, ~eol:c =printf("%c", c); + + +eol = '\n' + +{ + int main(void) { + int c; + init_test2(); + do { + c = getchar(); + PCB.input_code = c; + test2(); + } while ( c != '\n'); + return 0; + } +} +