# [Parser Tools] peg grammar action templates.
 #

 # The "eval" action executes each of the children of the matched
 # rule and returns the concatenation of all the results.
 #
 eval  { method %action { start end args } {
            set reply {}
            foreach arg $args { append reply [my {*}$arg] }
            set reply
        }
 }

 # The "token" rule returns the text that matched this rule.
 #
 token { method %action { start end      } {
            string range $string $start $end
        }
 }