ack/plat/em/libsys/_unlink.e

17 lines
160 B
Plaintext
Raw Normal View History

1990-01-22 11:48:01 +00:00
#
mes 2,EM_WSIZE,EM_PSIZE
exp $_unlink
pro $_unlink,0
lal 0
loi EM_PSIZE
loc 10
mon
zne *1
loc 0
ret EM_WSIZE
1
ste errno
loc -1
ret EM_WSIZE
end