Research V2 development

Work on file lib/link.s

Synthesized-from: v2

diff --git a/lib/link.s b/lib/link.s
new file mode 100644 (file)
index 0000000..8116ee9
--- /dev/null
+++ b/lib/link.s
@@ -0,0 +1,19 @@
+/ C library -- link
+
+/ error = link(old-file, new-file);
+/
+
+       .globl  _link
+
+.data
+_link:
+       1f
+.text
+1:
+       mov     2(sp),0f
+       mov     4(sp),0f+2
+       clr     r0
+       sys     link; 0:..; ..
+       adc     r0
+       rts     pc
+