home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Trees / V7 / usr / src / libc / sys / creat.s < prev    next >
Encoding:
Text File  |  1979-01-10  |  268 b   |  25 lines
  1. / C library -- creat
  2.  
  3. / file = creat(string, mode);
  4. /
  5. / file == -1 if error
  6.  
  7. .globl    _creat
  8. .globl    cerror
  9. .creat = 8.
  10.  
  11. _creat:
  12.     mov    r5,-(sp)
  13.     mov    sp,r5
  14.     mov    4(r5),0f
  15.     mov    6(r5),0f+2
  16.     sys    0; 9f
  17.     bec    1f
  18.     jmp    cerror
  19. 1:
  20.     mov    (sp)+,r5
  21.     rts    pc
  22. .data
  23. 9:
  24.     sys    .creat; 0:..; ..
  25.