package ACODES is

-- This package contains constants to make use of
-- the pragma ACODE easier.

   ADD : constant := 0;
   SUB : constant := 1;
   MUL : constant := 2;
   DIV : constant := 3;
   EQU : constant := 4;
   NEQ : constant := 5;
   LES : constant := 6;
   GTR : constant := 7;
   LEQ : constant := 8;
   GEQ : constant := 9;
   C_NOT : constant := 10; -- NOT is a reserved word in Ada
   NEG : constant := 11;
   C_IN : constant := 12; -- IN is a reserved word in Ada
   C_AND : constant := 13;
   C_OR : constant := 14;
   C_XOR : constant := 15;
   POW : constant := 16;
   C_MOD : constant := 17;
   C_REM : constant := 18;
   LOAD2 : constant := 19;
   LOAD : constant := 20;
   STORE : constant := 21;
   BRANCH : constant := 22;
   JUMP : constant := 23;
   ENTER : constant := 24;
   LEAVE : constant := 25;
   CALL : constant := 26;
   INC : constant := 27;
   DEC : constant := 28;
   GLC : constant := 29;
   PLC : constant := 30;
   ILC : constant := 31;
   DLC : constant := 32;
   SHL : constant := 33;
   SHR : constant := 34;
   STORE2 : constant := 35;
   ILC0 : constant := 36;
   ILC1 : constant := 37;
   DLC0 : constant := 38;
   DLC1 : constant := 39;
   PLC0 : constant := 40;
   PLC1 : constant := 41;
   GLC0 : constant := 42;
   GLC1 : constant := 43;
   SHL1 : constant := 44;
   SHR1 : constant := 45;
   DUP1 : constant := 46;
   LOAD1 : constant := 47;
   STORE1 : constant := 48;
   NOP : constant := 49;
   SFP : constant := 50;
   C_ABS : constant := 51;
   NATIVE : constant := 52;
   LCALL : constant := 53;
   ADR : constant := 54;
   HCOPY : constant := 55;
   CONC : constant := 56;
   DUP : constant := 57;
   SEX : constant := 58;
   REX : constant := 59;
   PEX : constant := 60;
   BLOCK : constant := 61;
   LINE : constant := 62;
   CEX : constant := 63;
   STATIC : constant := 64;
   INDEX : constant := 65;
   ADDF : constant := 66;
   SUBF : constant := 67;
   MULF : constant := 68;
   DIVF : constant := 69;
   EQUF : constant := 70;
   NEQF : constant := 71;
   LESF : constant := 72;
   GTRF : constant := 73;
   LEQF : constant := 74;
   GEQF : constant := 75;
   NEGF : constant := 76;
   POWF : constant := 77;
   MULFI : constant := 78;
   MULIF : constant := 79;
   DIVFI : constant := 80;
   EQU1 : constant := 81;
   NEQ1 : constant := 82;
   LES1 : constant := 83;
   GTR1 : constant := 84;
   LEQ1 : constant := 85;
   GEQ1 : constant := 86;
   EQUS : constant := 87;
   NEQS : constant := 88;
   LESS : constant := 89;
   GTRS : constant := 90;
   LEQS : constant := 91;
   GEQS : constant := 92;
   CONCCS : constant := 93;
   CONCSC : constant := 94;
   CONCCC : constant := 95;
   PLC2 : constant := 96;
   GLC2 : constant := 97;
   ILC2 : constant := 98;
   DLC2 : constant := 99;
   ABSF : constant := 100;
   CVFI : constant := 101;
   CVIF : constant := 102;
   POP1 : constant := 103;
   CVABS : constant := 104;
   RBRANCH : constant := 105;
   LLOAD : constant := 106;
   LSTORE : constant := 107;
   INP : constant := 108;
   OUTP : constant := 109;
   ANDL : constant := 110;
   ORL : constant := 111;
   XORL : constant := 112;
   NOTL : constant := 113;
   CVIS : constant := 114;
   CVSI : constant := 115;
   EQUL : constant := 116;
   LOCAL : constant := 117;
   INF : constant := 118;
   DUP2 : constant := 119;
   RSIZE : constant := 120;
   HDISP : constant := 121;
   UADD : constant := 122;
   MKPOS : constant := 123;
   IMAGE : constant := 124;
   VALUE : constant := 125;

end ACODES;