home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Trees / V6 / usr / source / s4 / link.s < prev    next >
Encoding:
Text File  |  1975-05-13  |  237 b   |  23 lines
  1. / C library -- link
  2.  
  3. / error = link(old-file, new-file);
  4. /
  5.  
  6. .globl    _link, cerror
  7.  
  8. _link:
  9.     mov    r5,-(sp)
  10.     mov    sp,r5
  11.     mov    4(r5),0f
  12.     mov    6(r5),0f+2
  13.     sys    0; 9f
  14.     bec    1f
  15.     jmp    cerror
  16. 1:
  17.     clr    r0
  18.     mov    (sp)+,r5
  19.     rts    pc
  20. .data
  21. 9:
  22.     sys    link; 0:..; ..
  23.