1990-01-11 16:00:19 +00:00
|
|
|
.sect .text; .sect .rom; .sect .data; .sect .bss
|
|
|
|
|
.sect .text
|
|
|
|
|
setpgrp = 39
|
|
|
|
|
.define _setpgrp
|
|
|
|
|
.define _getpgrp
|
1987-02-02 16:06:51 +00:00
|
|
|
|
|
|
|
|
_setpgrp:
|
1990-01-11 16:00:19 +00:00
|
|
|
.data2 0x0000
|
1987-02-02 16:06:51 +00:00
|
|
|
pushl $1
|
1990-01-11 16:00:19 +00:00
|
|
|
calls $1,Ipgrp
|
1987-02-02 16:06:51 +00:00
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
_getpgrp:
|
1990-01-11 16:00:19 +00:00
|
|
|
.data2 0x0000
|
1987-02-02 16:06:51 +00:00
|
|
|
pushl $0
|
1990-01-11 16:00:19 +00:00
|
|
|
calls $1,Ipgrp
|
1987-02-02 16:06:51 +00:00
|
|
|
ret
|
|
|
|
|
|
1990-01-11 16:00:19 +00:00
|
|
|
Ipgrp:
|
|
|
|
|
.data2 0x0000
|
1987-02-02 16:06:51 +00:00
|
|
|
chmk $setpgrp
|
|
|
|
|
ret
|
