test/unit/getcmdcode/getcmdcode.c

   1 #include "casl2.h"
   2
   3 int main(){
   4     int i;
   5     WORD code;
   6     struct CMDCODELIST {
   7         char *cmd;
   8         CMDTYPE type;
   9     } cmdcodelist[] = {
  10         { "LD", NONE }, { "LD", 066 }, { "NOEX", R1_R2 },
  11         { "NOP", NONE }, { "LD", R_ADR_X_ }, { "ST", R_ADR_X },
  12         { "LAD", R_ADR_X }, { "LD", R1_R2 }, { "ADDA", R_ADR_X_ },
  13         { "SUBA", R_ADR_X_ }, { "ADDL", R_ADR_X_ }, { "SUBL", R_ADR_X_ },
  14         { "ADDA", R1_R2 }, { "SUBA", R1_R2 }, { "ADDL", R1_R2 },
  15         { "SUBL", R1_R2 }, { "AND", R_ADR_X_ }, { "OR", R_ADR_X_ },
  16         { "XOR", R_ADR_X_ }, { "AND", R1_R2 }, { "OR", R1_R2 },
  17         { "XOR", R1_R2 }, { "CPA", R_ADR_X_ }, { "CPL", R_ADR_X_ },
  18         { "CPA", R1_R2 }, { "CPL", R1_R2 }, { "SLA", R_ADR_X },
  19         { "SRA", R_ADR_X }, { "SLL", R_ADR_X }, { "SRL", R_ADR_X },
  20         { "JMI", ADR_X }, { "JNZ", ADR_X }, { "JZE", ADR_X },
  21         { "JUMP", ADR_X }, { "JPL", ADR_X }, { "JOV", ADR_X },
  22         { "PUSH", ADR_X }, { "POP", R_ }, { "CALL", ADR_X },
  23         { "SVC", ADR_X }, { "RET", NONE }
  24     };
  25     create_cmdtype_code();
  26     for(i = 0; i < sizeof(cmdcodelist)/sizeof(cmdcodelist[0]); i++) {
  27         code = getcmdcode(cmdcodelist[i].cmd, cmdcodelist[i].type);
  28         printf("%s:0%02o ---> #%04X\n", cmdcodelist[i].cmd, cmdcodelist[i].type, code);
  29         if(cerrno != 0) {
  30             printf("\terror - %d: %s", cerrno, cerrmsg);
  31             freecerr();
  32         }
  33     }
  34     free_cmdtype_code();
  35     return 0;
  36 }