Return to 21rang.s CVS log

Up to [CSRG BSD Unix] / 41BSD / cmd / px

Annotation of 41BSD/cmd/px/21rang.s, revision 1.1

1.1     ! root        1: #
        !             2: # Copyright (c) 1979 Regents of the University of California
        !             3: #
        !             4: # char sccsid[] = "@(#)21rang.s 4.1 10/10/80";
        !             5: #
        !             6: # range checking
        !             7: #
        !             8: _RANG2:
        !             9:        cvtbl   (r10)+,r1
        !            10:        bneq    l2101
        !            11:        cvtwl   (r10)+,r1
        !            12: l2101:
        !            13:        cmpw    (sp),r1
        !            14:        blss    erange
        !            15:        cmpw    (sp),(r10)+
        !            16:        bgtr    erange
        !            17:        jmp     (r8)
        !            18: _RANG24:
        !            19:        incl    r10
        !            20:        cvtwl   (sp),r0
        !            21:        cmpl    r0,(r10)+
        !            22:        blss    erange
        !            23:        cmpl    r0,(r10)+
        !            24:        bgtr    erange
        !            25:        jmp     (r8)
        !            26: _RANG42:
        !            27:        cvtbl   (r10)+,r0
        !            28:        bneq    l2102
        !            29:        cvtwl   (r10)+,r0
        !            30: l2102:
        !            31:        cvtwl   (r10)+,r1
        !            32:        cmpl    (sp),r0
        !            33:        blss    erange
        !            34:        cmpl    (sp),r1
        !            35:        bgtr    erange
        !            36:        jmp     (r8)
        !            37: _RANG4:
        !            38:        incl    r10
        !            39:        cmpl    (sp),(r10)+
        !            40:        blss    erange
        !            41:        cmpl    (sp),(r10)+
        !            42:        bgtr    erange
        !            43:        jmp     (r8)
        !            44: erange:
        !            45:        movw    $ERANGE,_perrno
        !            46:        jbr     error
        !            47: _RSNG2:
        !            48:        cvtbl   (r10)+,r1
        !            49:        bneq    l2103
        !            50:        cvtwl   (r10)+,r1
        !            51: l2103:
        !            52:        movw    (sp),r0
        !            53:        blss    erange
        !            54:        cmpw    r0,r1
        !            55:        bgtr    erange
        !            56:        jmp     (r8)
        !            57: _RSNG24:
        !            58:        incl    r10
        !            59:        cvtwl   (sp),r0
        !            60:        blss    erange
        !            61:        cmpl    r0,(r10)+
        !            62:        bgtr    erange
        !            63:        jmp     (r8)
        !            64: _RSNG42:
        !            65:        cvtbl   (r10)+,r1
        !            66:        bneq    l2104
        !            67:        cvtwl   (r10)+,r1
        !            68: l2104:
        !            69:        movl    (sp),r0
        !            70:        blss    erange
        !            71:        cmpl    r0,r1
        !            72:        bgtr    erange
        !            73:        jmp     (r8)
        !            74: _RSNG4:
        !            75:        incl    r10
        !            76:        movl    (sp),r0
        !            77:        blss    erange
        !            78:        cmpl    r0,(r10)+
        !            79:        bgtr    erange
        !            80:        jmp     (r8)

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.