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 / setgid.s < prev    next >
Text File  |  1975-05-14  |  197b  |  19 lines
  1. / C library -- setgid
  2.  
  3. / error = setgid(uid);
  4.  
  5. setgid = 46.
  6. .globl    _setgid, cerror
  7.  
  8. _setgid:
  9.     mov    r5,-(sp)
  10.     mov    sp,r5
  11.     mov    4(r5),r0
  12.     sys    setgid
  13.     bec    1f
  14.     jmp    cerror
  15. 1:
  16.     clr    r0
  17.     mov    (sp)+,r5
  18.     rts    pc
  19.