Added .deps to ignore.

[external/ragel.git] / test / testcase.txl

diff --git a/test/testcase.txl b/test/testcase.txl
index f676e3f..3369c15 100644 (file)
--- a/test/testcase.txl
+++ b/test/testcase.txl
@@ -15,9 +15,10 @@ end compounds
 
 keys
        'int 'bool 'true 'false 'char 'ptr
-       'if 'else 'printi 'prints 
+       'if 'else 'printi 'prints 'printb 'print_token
        'fc 'fpc 'fbreak 'fgoto 'fcall 'fret 'fhold 'fexec
        'machine 'alphtype 'action
+       'first_token_char
 end keys
 
 define lang_indep
@@ -77,10 +78,11 @@ end define
 
 define al_print_stmt
                [print_cmd] [al_expr] '; [NL]
+       |       'print_token '; [NL]
 end define
 
 define print_cmd
-               'printi | 'prints
+               'printi | 'prints | 'printb
 end define
 
 define al_variable_decl
@@ -108,18 +110,24 @@ define al_expr_extend
 end define
 
 define al_expr_op
-               '= | '+ | '- | '* | '/ | '== | '<= | '>=
+               '= | '+ | '- | '* | '/ | '== | '<= | '>= | '< | '>
 end define
 
 define al_term
+               [al_term_base] [opt union]
+end define
+
+define al_term_base
                [id]
+       |       [SPOFF] [id] '( [SPON] [al_expr] ')
        |       [opt al_sign] [number]
-       |       [stringlit] [opt union]
+       |       [stringlit] 
        |       [charlit] 
        |       'fc
        |       'true
        |       'false
        |       '( [al_expr] ')
+       |       'first_token_char
 end define
 
 define al_sign