Artifact 8b20d76a3ec848de112dc86d041c7386f5c06aed:
- File modules/pt/tests/data/ok/peg_param-compact/6_optional — part of check-in [6d971eaca0] at 2010-03-26 05:07:24 on branch trunk — * New module, 'pt' for ParserTools. Requires Tcl 8.5. Supercedes grammar_peg, grammar_me, and page. (user: andreas_kupries size: 506)
- File modules/pt/tests/data/ok/peg_param-unopt/6_optional — part of check-in [6d971eaca0] at 2010-03-26 05:07:24 on branch trunk — * New module, 'pt' for ParserTools. Requires Tcl 8.5. Supercedes grammar_peg, grammar_me, and page. (user: andreas_kupries size: 506)
# -*- text -*-
# Parsing Expression Grammar 'TEMPLATE'.
# Generated for unknown, from file 'TEST'
#
# Grammar Start Expression
#
<<MAIN>>:
call optional_3
halt
optional_3:
# ?
# 'a'
loc_push
error_push
call char_1
error_pop_merge
fail! loc_pop_rewind
ok! loc_pop_discard
status_ok
return
char_1:
# 'a'
input_next "t a"
ok! test_char "a"
return
#
#