home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Trees / V6 / usr / source / s5 / stat.s < prev    next >
Encoding:
Text File  |  1975-05-13  |  290 b   |  26 lines
  1. / C library -- stat
  2.  
  3. / error = stat(string, statbuf);
  4.  
  5. / int statbuf[18] or
  6. / char statbuf[36]
  7. / as appropriate
  8.  
  9. .globl    _stat, cerror
  10.  
  11. _stat:
  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.     clr    r0
  21.     mov    (sp)+,r5
  22.     rts    pc
  23. .data
  24. 9:
  25.     sys    stat; 0:..; ..
  26.