{s Interrupt
    struct  14 is_Node      ( { Node=14;exec/nodes )
    APTR    is_Data
    APTR    is_Code
   s}

{s IntVector
    APTR    iv_Data
    APTR    iv_Code
    APTR    iv_Node
   s}

{s SoftIntList
    struct  14 sh_List      ( { List=14;exec/lists )
    WORD    sh_Pad
   s}

EQU SIH_PRIMASK     ($f0)

EQU INTB_NMI        15
EQU INTF_NMI        (1<<15)


>Exec ^ -162 (r A1 D0 r) SetIntVector (s int int# -- oldint )
>Exec   -168 (r A1 D0 r) AddIntServer (s int int# -- )
>Exec   -174 (r A1 D0 r) RemIntServer (s int int# -- )
>Exec   -180 (r A1    r) Cause        (s int -- )