BSD 2 development
authorBill Joy <wnj@ucbvax.Berkeley.EDU>
Mon, 7 May 1979 11:54:20 +0000 (03:54 -0800)
committerBill Joy <wnj@ucbvax.Berkeley.EDU>
Mon, 7 May 1979 11:54:20 +0000 (03:54 -0800)
Work on file src/pascal/fpdata/yycopy.s

Synthesized-from: 2bsd

src/pascal/fpdata/yycopy.s [new file with mode: 0644]

diff --git a/src/pascal/fpdata/yycopy.s b/src/pascal/fpdata/yycopy.s
new file mode 100644 (file)
index 0000000..e5ad580
--- /dev/null
@@ -0,0 +1,21 @@
+.data
+.globl _Y, _OY, _OYcopy
+/.globl _Ycopy
+
+_OYcopy:
+       mov     $_OY,r0
+       mov     $_Y,r1
+       mov     r2,-(sp)
+/0:
+       mov     $7.,r2
+1:
+       mov     (r1)+,(r0)+
+       sob     r2,1b
+       mov     (sp)+,r2
+       rts     pc
+/
+/_Ycopy:
+/      mov     2(sp),r0
+/      mov     4(sp),r1
+/      mov     r2,-(sp)
+/      br      0b