head	1.1;
access;
symbols
	tcllib-1-13:1.1;
locks; strict;
comment	@# @;


1.1
date	2010.03.26.05.07.24;	author andreas_kupries;	state Exp;
branches;
next	;


desc
@@


1.1
log
@
	* New module, 'pt' for ParserTools. Requires Tcl 8.5. Supercedes
	  grammar_peg, grammar_me, and page.
@
text
@snit::type a_pe_grammar {
    constructor {} {
        install myg using pt::peg::container ${selfns}::G
        $myg start {n Expression}
        $myg add   Expression Function Sinus
        $myg modes {
            Expression value
            Function   value
            Sinus      value
        }
        $myg rules {
            Expression {n Function}
            Function   {n Sinus}
            Sinus      {x {t s} {t i} {t n} {t \50} {n Expression} {t \51}}
        }
        return
    }

    component myg
    delegate method * to myg
}
@
