2.9BSD - /usr/src/ucb/pascal/utilities/fpdata/yycopy.s

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

Defined variables