home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / 2014.11.minnie.tuhs.org.tar / minnie.tuhs.org / UnixArchive / PDP-11 / Trees / V6 / usr / source / s5 / stime.s < prev    next >
Text File  |  1975-05-14  |  161b  |  16 lines
  1. .globl    _stime, cerror
  2.  
  3. _stime:
  4.     mov    r5,-(sp)
  5.     mov    sp,r5
  6.     mov    4(sp),r1
  7.     mov    (r1)+,r0
  8.     mov    (r1),r1
  9.     sys    stime
  10.     bec    1f
  11.     jmp    cerror
  12. 1:
  13.     clr    r0
  14.     mov    (sp)+,r5
  15.     rts    pc
  16.