Tcl Library Source Code

Artifact [4384dfde1f]
Login

Artifact 4384dfde1f8faca5a19b73b0e8780e8e500e19fd:


# -*- tcl -*-
# Parsing Expression Grammar 'TEMPLATE'.
# Generated for unknown, from file 'TEST'

package require Tcl 8.5
package require snit
package require pt::peg::container

snit::type TEMPLATE {
    constructor {} {
        install myg using pt::peg::container ${selfns}::G
        $myg start {/ {t a} {t b} {t c}}
    }

    component myg
    delegate method * to myg
}

package provide TEMPLATE
return