ack/mach/pdp/libem/mon.s
1994-06-24 14:02:31 +00:00

13 lines
168 B
ArmAsm

.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
! $Id$
.sect .text
.define mon~
EBADMON = 031
mon~:
mov $EBADMON,-(sp)
jsr pc,trp~
tst (sp)+
rts pc