Initial revision
This commit is contained in:
17
mach/pdp/libsys/getgrp.s
Normal file
17
mach/pdp/libsys/getgrp.s
Normal file
@@ -0,0 +1,17 @@
|
||||
#include "sys.h"
|
||||
.globl _getgrp
|
||||
.globl _errno
|
||||
|
||||
_getgrp:
|
||||
mov 2(sp),0f+2
|
||||
sys indir; 0f
|
||||
bec 1f
|
||||
mov r0,_errno
|
||||
mov $-1,r0
|
||||
rts pc
|
||||
1:
|
||||
clr r0
|
||||
rts pc
|
||||
.data
|
||||
0:
|
||||
sys getgrp; ..
|
||||
Reference in New Issue
Block a user