GENERIC: ( times -- term' ) M: string ; EBNF: parse-regexp Times = .* => [[ "foo" ]] Regexp = Times:t => [[ t ]] ;EBNF