home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Trees / V6 / usr / source / s4 / getpid.s < prev    next >
Encoding:
Text File  |  1975-05-13  |  127 b   |  14 lines
  1. / getpid -- get process ID
  2.  
  3. getpid    = 20.
  4.  
  5. .globl    _getpid
  6.  
  7. _getpid:
  8.     mov    r5,-(sp)
  9.     mov    sp,r5
  10.     sys    getpid
  11.     mov    (sp)+,r5
  12.     rts    pc
  13.  
  14.