8080-generator-parser ( -- parser )

Vocabulary

cpu.8080.emulator

Inputs

None

Outputs

parser

an object

Definition

USING: combinators make peg ;

IN: cpu.8080.emulator

: 8080-generator-parser ( -- parser )
    [
        NOP-instruction , RST-0-instruction ,
        RST-8-instruction , RST-10H-instruction ,
        RST-18H-instruction , RST-20H-instruction ,
        RST-28H-instruction , RST-30H-instruction ,
        RST-38H-instruction , JP-F|FF,NN-instruction ,
        JP-NN-instruction , JP-(RR)-instruction ,
        CALL-F|FF,NN-instruction , CALL-NN-instruction ,
        CPL-instruction , CCF-instruction , SCF-instruction ,
        DAA-instruction , RLA-instruction , RRA-instruction ,
        RLCA-instruction , RRCA-instruction , HALT-instruction ,
        DI-instruction , EI-instruction , AND-N-instruction ,
        AND-R-instruction , AND-(RR)-instruction ,
        XOR-N-instruction , XOR-R-instruction ,
        XOR-(RR)-instruction , OR-N-instruction ,
        OR-R-instruction , OR-(RR)-instruction ,
        CP-N-instruction , CP-R-instruction ,
        CP-(RR)-instruction , DEC-RR-instruction ,
        DEC-R-instruction , DEC-(RR)-instruction ,
        POP-RR-instruction , PUSH-RR-instruction ,
        INC-RR-instruction , INC-R-instruction ,
        INC-(RR)-instruction , LD-RR,NN-instruction ,
        LD-RR,RR-instruction , LD-R,N-instruction ,
        LD-R,R-instruction , LD-(RR),N-instruction ~51 more~
    ] choice* [ ( -- quot ) call-effect ] action ;