# 2.11BSD#431 - /usr/src/ucb/pascal/px/17ind.s

       1: /
       2: / INDS
       3: /
       4: _IND2:
       5:         mov     *(sp)+,-(sp)
       6:         return
       7: _IND4:
       8:         mov     (sp),r0
       9:         tst     -(sp)
      10:         mov     sp,r2
      11:         mov     (r0)+,(r2)+
      12:         mov     (r0)+,(r2)+
      13:         return
      14: _IND1:
      15:         movb    *(sp),r0
      16:         mov     r0,(sp)
      17:         return
      18: _IND8:
      19:         mov     $8,r3
      20: _IND:
      21:         bne     1f
      22:         mov     (lc)+,r3
      23: 1:
      24:         mov     (sp)+,r0
      25: _INDcon:
      26:         add     r3,r0
      27:         asr     r3
      28:         bcc     1f
      29:         movb    -(r0),r1
      30:         bic     $!377,r1
      31:         mov     r1,-(sp)                / clean for sets, e.g.
      32: 1:
      33:         inc     r3
      34:         br      2f
      35: 1:
      36:         mov     -(r0),-(sp)
      37: 2:
      38:         sob     r3,1b
      39:         return

#### Defined functions

_IND defined in line 20; never used
_IND1 defined in line 14; never used
_IND2 defined in line 4; never used
_IND4 defined in line 7; never used
_IND8 defined in line 18; never used
_INDcon defined in line 25; never used

Last modified: 1981-07-10 Generated: 2016-12-26 | Generated by src2html V0.67 page hit count: 561 |