Annotation of coco/dispatch.src, revision 1.1

1.1     ! root        1:        PAGE
        !             2:        SBTTL "--- OPCODE DISPATCH TABLES ---"
        !             3: 
        !             4:        ; 0-OPS
        !             5: 
        !             6: OPT0:  DW      ZRTRUE          ; 0
        !             7:        DW      ZRFALS          ; 1
        !             8:        DW      ZPRI            ; 2
        !             9:        DW      ZPRR            ; 3
        !            10:        DW      ZNOOP           ; 4
        !            11:        DW      ZSAVE           ; 5
        !            12:        DW      ZREST           ; 6
        !            13:        DW      ZSTART          ; 7
        !            14:        DW      ZRSTAK          ; 8
        !            15:        DW      POPSTK          ; 9
        !            16:        DW      ZQUIT           ; 10
        !            17:        DW      ZCRLF           ; 11
        !            18:        DW      ZUSL            ; 12
        !            19:        DW      ZVER            ; 13
        !            20: 
        !            21: NOPS0  EQU     14              ; NUMBER OF 0-OPS
        !            22: 
        !            23:        ; 1-OPS
        !            24: 
        !            25: OPT1:  DW      ZZERO           ; 0
        !            26:        DW      ZNEXT           ; 1
        !            27:        DW      ZFIRST          ; 2
        !            28:        DW      ZLOC            ; 3
        !            29:        DW      ZPTSIZ          ; 4
        !            30:        DW      ZINC            ; 5
        !            31:        DW      ZDEC            ; 6
        !            32:        DW      ZPRB            ; 7
        !            33:        DW      BADOP1          ; 8 (UNDEFINED)
        !            34:        DW      ZREMOV          ; 9
        !            35:        DW      ZPRD            ; 10
        !            36:        DW      ZRET            ; 11
        !            37:        DW      ZJUMP           ; 12
        !            38:        DW      ZPRINT          ; 13
        !            39:        DW      ZVALUE          ; 14
        !            40:        DW      ZBCOM           ; 15
        !            41: 
        !            42: NOPS1  EQU     16              ; NUMBER OF 1-OPS
        !            43: 
        !            44:        ; 2-OPS
        !            45: 
        !            46: OPT2:  DW      BADOP2          ; 0 (UNDEFINED)
        !            47:        DW      ZEQUAL          ; 1
        !            48:        DW      ZLESS           ; 2
        !            49:        DW      ZGRTR           ; 3
        !            50:        DW      ZDLESS          ; 4
        !            51:        DW      ZIGRTR          ; 5
        !            52:        DW      ZIN             ; 6
        !            53:        DW      ZBTST           ; 7
        !            54:        DW      ZBOR            ; 8
        !            55:        DW      ZBAND           ; 9
        !            56:        DW      ZFSETP          ; 10
        !            57:        DW      ZFSET           ; 11
        !            58:        DW      ZFCLR           ; 12
        !            59:        DW      ZSET            ; 13
        !            60:        DW      ZMOVE           ; 14
        !            61:        DW      ZGET            ; 15
        !            62:        DW      ZGETB           ; 16
        !            63:        DW      ZGETP           ; 17
        !            64:        DW      ZGETPT          ; 18
        !            65:        DW      ZNEXTP          ; 19
        !            66:        DW      ZADD            ; 20
        !            67:        DW      ZSUB            ; 21
        !            68:        DW      ZMUL            ; 22
        !            69:        DW      ZDIV            ; 23
        !            70:        DW      ZMOD            ; 24
        !            71: 
        !            72: NOPS2  EQU     25              ; NUMBER OF 2-OPS
        !            73: 
        !            74:        ; X-OPS
        !            75: 
        !            76: OPTX:  DW      ZCALL           ; 0
        !            77:        DW      ZPUT            ; 1
        !            78:        DW      ZPUTB           ; 2
        !            79:        DW      ZPUTP           ; 3
        !            80:        DW      ZREAD           ; 4
        !            81:        DW      ZPRC            ; 5
        !            82:        DW      ZPRN            ; 6
        !            83:        DW      ZRAND           ; 7
        !            84:        DW      ZPUSH           ; 8
        !            85:        DW      ZPOP            ; 9
        !            86:        DW      ZSPLIT          ; 10
        !            87:        DW      ZSCRN           ; 11
        !            88: 
        !            89: NOPSX  EQU     12              ; NUMBER OF X-OPS
        !            90: 
        !            91:        END
        !            92: 

unix.superglobalmegacorp.com