diff options
Diffstat (limited to 'parser.y')
| -rw-r--r-- | parser.y | 94 |
1 files changed, 45 insertions, 49 deletions
@@ -10,7 +10,9 @@ void yyerror(const char *msg) fprintf(stderr, "%s\n", msg); } -#define INSTRUCTION(mnem) (struct instruction) { MNEM_ ## mnem } +#define INSTRUCTION_ARGS(m,a) (struct instruction) { MNEM_ ## m, a } +#define INSTRUCTION(m) (struct instruction) { MNEM_ ## m } +#define MKARGS(...) (struct arguments) { __VA_ARGS__ } %} @@ -23,6 +25,8 @@ void yyerror(const char *msg) %union { struct instruction inst; + struct arguments args; + struct argument arg; } %token END 0 "end of file" @@ -66,7 +70,17 @@ void yyerror(const char *msg) %token T_ADDPC %token T_NOP +%token <arg> T_REG +%token <arg> T_REGPTR +%token T_COMMA "," + %type <inst> inst +%type <args> reg2 +%type <args> reg3 +%type <args> regp +%type <args> regp_reg +%type <args> reg_regp + %% input: line @@ -78,52 +92,29 @@ line: T_SPACE inst eol | eol ; -inst: T_ADD - { $$ = INSTRUCTION(ADD); } - | T_SUB - { $$ = INSTRUCTION(SUB); } - | T_MUL - { $$ = INSTRUCTION(MUL); } - | T_DIV - { $$ = INSTRUCTION(DIV); } - | T_AND - { $$ = INSTRUCTION(AND); } - | T_OR - { $$ = INSTRUCTION(OR); } - | T_XOR - { $$ = INSTRUCTION(XOR); } - | T_LSL - { $$ = INSTRUCTION(LSL); } - | T_LSR - { $$ = INSTRUCTION(LSR); } - | T_ASL - { $$ = INSTRUCTION(ASL); } - | T_ASR - { $$ = INSTRUCTION(ASR); } - | T_ROL - { $$ = INSTRUCTION(ROL); } - | T_ROR - { $$ = INSTRUCTION(ROR); } - | T_NOT - { $$ = INSTRUCTION(NOT); } - | T_NEG - { $$ = INSTRUCTION(NEG); } - | T_BTC - { $$ = INSTRUCTION(BTC); } - | T_BTS - { $$ = INSTRUCTION(BTS); } - | T_MOV - { $$ = INSTRUCTION(MOV); } - | T_ST_B - { $$ = INSTRUCTION(ST_B); } - | T_ST_W - { $$ = INSTRUCTION(ST_W); } - | T_LD_BL - { $$ = INSTRUCTION(LD_BL); } - | T_LD_BH - { $$ = INSTRUCTION(LD_BH); } - | T_LD_W - { $$ = INSTRUCTION(LD_W); } +inst: T_ADD reg3 { $$ = INSTRUCTION_ARGS(ADD, $2); } + | T_SUB reg3 { $$ = INSTRUCTION_ARGS(SUB, $2); } + | T_MUL reg3 { $$ = INSTRUCTION_ARGS(MUL, $2); } + | T_DIV reg3 { $$ = INSTRUCTION_ARGS(DIV, $2); } + | T_AND reg3 { $$ = INSTRUCTION_ARGS(AND, $2); } + | T_OR reg3 { $$ = INSTRUCTION_ARGS(OR, $2); } + | T_XOR reg3 { $$ = INSTRUCTION_ARGS(XOR, $2); } + | T_LSL reg3 { $$ = INSTRUCTION_ARGS(LSL, $2); } + | T_LSR reg3 { $$ = INSTRUCTION_ARGS(LSR, $2); } + | T_ASL reg3 { $$ = INSTRUCTION_ARGS(ASL, $2); } + | T_ASR reg3 { $$ = INSTRUCTION_ARGS(ASR, $2); } + | T_ROL reg3 { $$ = INSTRUCTION_ARGS(ROL, $2); } + | T_ROR reg3 { $$ = INSTRUCTION_ARGS(ROR, $2); } + | T_NOT reg2 { $$ = INSTRUCTION_ARGS(NOT, $2); } + | T_NEG reg2 { $$ = INSTRUCTION_ARGS(NEG, $2); } + | T_BTC reg2 { $$ = INSTRUCTION_ARGS(BTC, $2); } + | T_BTS reg2 { $$ = INSTRUCTION_ARGS(BTS, $2); } + | T_MOV reg2 { $$ = INSTRUCTION_ARGS(MOV, $2); } + | T_ST_B regp_reg { $$ = INSTRUCTION_ARGS(ST_B, $2); } + | T_ST_W regp_reg { $$ = INSTRUCTION_ARGS(ST_W, $2); } + | T_LD_BL reg_regp { $$ = INSTRUCTION_ARGS(LD_BL, $2); } + | T_LD_BH reg_regp { $$ = INSTRUCTION_ARGS(LD_BH, $2); } + | T_LD_W reg_regp { $$ = INSTRUCTION_ARGS(LD_W, $2); } | T_LDI_BL { $$ = INSTRUCTION(LDI_BL); } | T_LDI_BH @@ -142,14 +133,19 @@ inst: T_ADD { $$ = INSTRUCTION(BLE); } | T_BRA { $$ = INSTRUCTION(BRA); } - | T_JMP - { $$ = INSTRUCTION(JMP); } + | T_JMP regp { $$ = INSTRUCTION_ARGS(JMP, $2); } | T_ADDPC { $$ = INSTRUCTION(ADDPC); } | T_NOP { $$ = INSTRUCTION(NOP); } ; +reg2: T_SPACE T_REG "," T_REG { $$ = MKARGS($2, $4); } +reg3: T_SPACE T_REG "," T_REG "," T_REG { $$ = MKARGS($2, $4, $6); } +regp: T_SPACE T_REGPTR { $$ = MKARGS($2); } +regp_reg: T_SPACE T_REGPTR "," T_REG { $$ = MKARGS($2, $4); } +reg_regp: T_SPACE T_REG "," T_REGPTR { $$ = MKARGS($2, $4); } + eol: T_EOL | T_SPACE T_EOL ; |