Annotation of 40BSD/cmd/px/17ind.s, revision 1.1.1.1

1.1       root        1: #
                      2: # Copyright (c) 1979 Regents of the University of California
                      3: #
                      4: # char sccsid[] = "@(#)17ind.s 4.1 10/10/80";
                      5: #
                      6: # INDS
                      7: #
                      8: _IND1:
                      9:        incl    r10
                     10:        cvtbw   *(sp)+,-(sp)
                     11:        jmp     (r8)
                     12: _IND14:
                     13:        incl    r10
                     14:        cvtbl   *(sp)+,-(sp)
                     15:        jmp     (r8)
                     16: _IND2:
                     17:        incl    r10
                     18:        movw    *(sp)+,-(sp)
                     19:        jmp     (r8)
                     20: _IND24:
                     21:        incl    r10
                     22:        cvtwl   *(sp)+,-(sp)
                     23:        jmp     (r8)
                     24: _IND4:
                     25:        incl    r10
                     26:        pushl   *(sp)+
                     27:        jmp     (r8)
                     28: _IND8:
                     29:        incl    r10
                     30:        movq    *(sp)+,-(sp)
                     31:        jmp     (r8)
                     32: _IND:
                     33:        movl    (sp)+,r1
                     34:        cvtbl   (r10)+,r0
                     35:        jneq    l1701
                     36:        movzwl  (r10)+,r0
                     37: l1701:
                     38:        movl    r0,r2           #r2 has length of stack space
                     39:        blbc    r2,l1702        #adjust r2 to word boundry
                     40:        incl    r2
                     41: l1702:
                     42:        subl2   r2,sp           #allocate stack space
                     43:        movc5   r0,(r1),$0,r2,(sp)   #move string to stack
                     44:        jmp     (r8)

unix.superglobalmegacorp.com

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