Annotation of 3BSD/cmd/px/26for.s, revision 1.1

1.1     ! root        1: #
        !             2: # 26for.s
        !             3: #
        !             4: # FORS
        !             5: #
        !             6: _FOR1U:
        !             7:        incl    r10
        !             8:        movl    (sp)+,r0        #r0 ptrs to index variable
        !             9:        movl    (sp)+,r1        #r1 has limit
        !            10:        acbb    r1,$1,(r0),repeat
        !            11:        addl2   $2,r10
        !            12:        jmp     (r8)
        !            13: repeat:
        !            14:        cvtwl   (r10),r1
        !            15:        addl2   r1,r10
        !            16:        jmp     (r8)
        !            17: _FOR2U:
        !            18:        incl    r10
        !            19:        movl    (sp)+,r0        #r0 ptrs to index variable
        !            20:        movl    (sp)+,r1        #r1 has limit
        !            21:        acbw    r1,$1,(r0),repeat
        !            22:        addl2   $2,r10
        !            23:        jmp     (r8)
        !            24: _FOR4U:
        !            25:        incl    r10
        !            26:        movl    (sp)+,r0        #r0 ptrs to index variable
        !            27:        aobleq  (sp)+,(r0),repeat
        !            28:        addl2   $2,r10
        !            29:        jmp     (r8)
        !            30: _FOR1D:
        !            31:        incl    r10
        !            32:        movl    (sp)+,r0        #r0 ptrs to index variable
        !            33:        movl    (sp)+,r1        #r1 has limit
        !            34:        acbb    r1,$-1,(r0),repeat
        !            35:        addl2   $2,r10
        !            36:        jmp     (r8)
        !            37: _FOR2D:
        !            38:        incl    r10
        !            39:        movl    (sp)+,r0        #r0 ptrs to index variable
        !            40:        movl    (sp)+,r1        #r1 has limit
        !            41:        acbw    r1,$-1,(r0),repeat
        !            42:        addl2   $2,r10
        !            43:        jmp     (r8)
        !            44: _FOR4D:
        !            45:        incl    r10
        !            46:        movl    (sp)+,r0        #r0 ptrs to index variable
        !            47:        acbl    (sp)+,$-1,(r0),repeat
        !            48:        addl2   $2,r10
        !            49:        jmp     (r8)

unix.superglobalmegacorp.com

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