$save nolist

/*
    NUCLEUS EXCEPTION CODE LITERALS
*/

        /* Environmental Exceptions */

DECLARE 
    E$OK                    LITERALLY '0000h',
    E$TIME                  LITERALLY '0001h',
    E$MEM                   LITERALLY '0002h',
    E$BUSY                  LITERALLY '0003h',
    E$LIMIT                 LITERALLY '0004h',
    E$CONTEXT               LITERALLY '0005h', 
    E$EXIST                 LITERALLY '0006h',
    E$STATE                 LITERALLY '0007h',
    E$NOT$CONFIGURED        LITERALLY '0008h',   
    E$INTERRUPT$SATURATION  LITERALLY '0009h',   
    E$INTERRUPT$OVERFLOW    LITERALLY '000Ah';    


        /* Programming Exceptions */

DECLARE 
    E$ZERO$DIVIDE           LITERALLY '8000h',
    E$OVERFLOW              LITERALLY '8001h', 
    E$TYPE                  LITERALLY '8002h',
    E$BOUNDS                LITERALLY '8003h', 
    E$PARAM                 LITERALLY '8004h',
    E$BAD$CALL              LITERALLY '8005h', 
    E$ARRAY$BOUNDS          LITERALLY '8006h',  
    E$NDP$ERROR             LITERALLY '8007h', 
    E$ILLEGAL$OPCODE        LITERALLY '8008h',   
    E$EMULATOR$TRAP         LITERALLY '8009h',  
    E$INTERRUPT$TABLE$LIMIT LITERALLY '800Ah',    
    E$CPU$XFER$DATA$LIMIT   LITERALLY '800Bh',    
    E$SEG$WRAP$AROUND       LITERALLY '800Dh',    
    E$CHECK$EXCEPTION       LITERALLY '8017h';    
       
$restore