1: / C library -- link 2: 3: / error = link(old-file, new-file); 4: 5: .globl _link 6: .globl cerror 7: .link = 9. 8: 9: _link: 10: mov r5,-(sp) 11: mov sp,r5 12: mov 4(r5),0f 13: mov 6(r5),0f+2 14: sys 0; 9f 15: bec 1f 16: jmp cerror 17: 1: 18: clr r0 19: mov (sp)+,r5 20: rts pc 21: .data 22: 9: 23: sys .link; 0:..; ..