Return to 26for.s CVS log

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

Annotation of 3BSD/cmd/px/26for.s, revision 1.1.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)

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