ack/plat/em/libsys/read.e
David Given 7eaa235fd1 Bodge the ancient em monitor library into building as a libsys for the em22
plat. It's completely untested, but it builds and makes e.out executables.
2018-06-13 21:44:25 +09:00

24 lines
240 B
Plaintext

#
mes 2,EM_WSIZE,EM_PSIZE
exp $read
pro $read,0
lol EM_WSIZE+EM_PSIZE
loc EM_WSIZE
loc EM_PSIZE
ciu
lal 0
loi EM_WSIZE+EM_PSIZE
loc 3
mon
zne *1
loc EM_PSIZE
loc EM_WSIZE
cui
bra *2
1
ste errno
loc -1
2
ret EM_WSIZE
end