Select Code to Download

#---------------------------------------------------------------------
+-------
# LEXER section.  Grab tokens and feed to the recognizer
...
        $token=undef;
    }
}

my $TG = Marpa::R2::Grammar->new({
        start=>'FILE', actions=>'ToyLang', default_action=>'swallow',
...
            [ mulop=>[qw( OP_DIV )], ],
        ],
});