test/unit/print_code_type/print_code_type.c

   1 #include "casl2.h"
   2 #include "cerr.h"
   3
   4 int main()
   5 {
   6     puts("== CODE_TYPE TABLE ==");
   7     create_code_type();
   8     print_code_type();
   9     free_code_type();
  10     if(cerrno != 0) {
  11         printf("\terror - %d: %s\n", cerrno, cerrmsg);
  12         freecerr();
  13         exit(-1);
  14     }
  15     return 0;
  16 }
  17
  18 /* エラー番号とエラーメッセージ */
  19 CERRARRAY cerr[] = {
  20     { 101, "label already defined" },
  21     { 102, "label table is full" },
  22     { 103, "label not found" },
  23     { 104, "label length is too long" },
  24     { 105, "no command in the line" },
  25     { 106, "operand count mismatch" },
  26     { 107, "no label in START" },
  27     { 108, "not command of operand \"r\"" },
  28     { 109, "not command of operand \"r1,r2\"" },
  29     { 110, "not command of operand \"r,adr[,x]\"" },
  30     { 111, "not command of operand \"adr[,x]\"" },
  31     { 112, "not command of no operand" },
  32     { 113, "command not defined" },
  33     { 114, "not integer" },
  34     { 115, "not hex" },
  35     { 116, "out of hex range" },
  36     { 117, "operand is too many" },
  37     { 118, "operand length is too long" },
  38     { 119, "out of COMET II memory" },
  39     { 120, "GR0 in operand x" },
  40     { 121, "cannot get operand token" },
  41     { 122, "cannot create hash table" },
  42     { 123, "illegal string" },
  43     { 124, "more than one character in literal" },
  44     { 201, "execute - out of COMET II memory" },
  45     { 202, "SVC input - out of Input memory" },
  46     { 203, "SVC output - out of COMET II memory" },
  47     { 204, "Program Register (PR) - out of COMET II memory" },
  48     { 205, "Stack Pointer (SP) - cannot allocate stack buffer" },
  49     { 206, "Address - out of COMET II memory" },
  50     { 207, "Stack Pointer (SP) - out of COMET II memory" },
  51     { 0, NULL },
  52 };