# 2.11BSD#431 - /usr/src/ucb/pascal/px/24pxp.s

       1: /
       2: / PXP stuff
       3: /
       4: _PXPBUF:
       5:         mov     (lc),r0
       6:         mov     r0,r2
       7:         add     $3,r0
       8:         add     r0,r0
       9:         add     r0,r0
      10:         mov     r0,-(sp)
      11:         mov     r0,_pxpsize
      12:         jsr     pc,_alloc
      13:         mov     r0,_pxpbuf
      14:         mov     r0,r2
      15:         mov     $426,(r2)+
      16:         clr     (r2)+
      17:         clr     -(sp)
      18:         jsr     pc,_time
      19:         tst     (sp)+
      20:         mov     r0,(r2)+
      21:         mov     r1,(r2)+
      22:         mov     (lc)+,(r2)+
      23:         tst     (lc)+
      24:         mov     (lc)+,(r2)+
      25:         return
      26: _TRACNT:
      27:         mov     4(lc),r3
      28:         add     (lc),lc
      29:         br      1f
      30: _COUNT:
      31:         bne     1f
      32:         mov     (lc)+,r3
      33: 1:
      34:         add     r3,r3
      35:         add     r3,r3
      36:         add     _pxpbuf,r3
      37:         add     $1,2(r3)
      38:         adc     (r3)
      39:         return

#### Defined functions

_COUNT defined in line 30; never used
_PXPBUF defined in line 4; never used
_TRACNT defined in line 26; never used

Last modified: 1987-03-13 Generated: 2016-12-26 | Generated by src2html V0.67 page hit count: 806 |