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

   1: .globl _Y, _OY, _OYcopy
   2: /.globl _Ycopy
   3: 
   4: _OYcopy:
   5:         mov     $_OY,r0
   6:         mov     $_Y,r1
   7:         mov     r2,-(sp)
   8: /0:
   9:         mov     $8.,r2
  10: 1:
  11:         mov     (r1)+,(r0)+
  12:         sob     r2,1b
  13:         mov     (sp)+,r2
  14:         rts     pc
  15: /
  16: /_Ycopy:
  17: /	mov	2(sp),r0
  18: /	mov	4(sp),r1
  19: /	mov	r2,-(sp)
  20: /	br	0b

Defined functions