ack/plat/em/libsys/link.e

17 lines
155 B
Plaintext
Raw Permalink Normal View History

1985-01-01 22:27:02 +00:00
#
mes 2,EM_WSIZE,EM_PSIZE
exp $link
pro $link,0
lal 0
loi 2*EM_PSIZE
loc 9
mon
zne *1
loc 0
ret EM_WSIZE
1
ste errno
loc -1
ret EM_WSIZE
end