|
|
1.1 root 1: # C library -- setpgrp, getpgrp
2:
3: # setpgrp(pid, pgrp); /* set pgrp of pid and descendants to pgrp */
4: # if pid==0 use current pid
5: #
6: # getpgrp(pid)
7: # implemented as setpgrp(pid, -1)
8:
9: setpgrp = 39
10: .globl _setpgrp
11: .globl _getpgrp
12: .globl cerror
13:
14: _setpgrp:
15: linkw a6,#0
16: pea setpgrp
17: trap #0
18: bcc noerror
19: jmp cerror
20: noerror:
21: unlk a6
22: rts
23:
24: _getpgrp:
25: pea -1
26: movl sp@(8),sp@-
27: jsr gpgrp
28: addql #8,sp
29: rts
30: gpgrp:
31: linkw a6,#0
32: pea setpgrp
33: trap #0
34: bcc noerror
35: jmp cerror
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.