home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Trees / V7 / usr / src / libc / sys / fstat.s < prev    next >
Encoding:
Text File  |  1979-01-10  |  307 b   |  28 lines
  1. / C library -- fstat
  2.  
  3. / error = fstat(file, statbuf);
  4.  
  5. / int statbuf[17] or
  6. / char statbuf[34]
  7. / as appropriate
  8.  
  9. .globl    _fstat
  10. .globl    cerror
  11. .fstat = 28.
  12.  
  13. _fstat:
  14.     mov    r5,-(sp)
  15.     mov    sp,r5
  16.     mov    4(r5),r0
  17.     mov    6(r5),0f
  18.     sys    0; 9f
  19.     bec    1f
  20.     jmp    cerror
  21. 1:
  22.     clr    r0
  23.     mov    (sp)+,r5
  24.     rts    pc
  25. .data
  26. 9:
  27.     sys    .fstat; 0:..
  28.