d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

The previous version still assumed two-byte integers.

Browse source
This commit is contained in:
keie 1985-03-04 15:33:28 +00:00
parent 2690f07cbd
commit d2a6847715
1 changed files with 6 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
mach/m68k4/libem/trp.s
View file

@ -3,10 +3,10 @@
.text
.trp:
move.l (sp)+,a2 ! return address
move.w (sp)+,d0 ! error number
move.l (sp)+,d0 ! error number
move.l a2,-(sp)
move.w d0,-(sp)
cmp #16,d0
move.l d0,-(sp)
cmp.l #16,d0
bcc 1f
btst d0,.trpim
bne 3f
@ -17,11 +17,13 @@
clr.l .trppc
jsr (a0)
3:
add #2,sp
add #4,sp
rts
9:
pea fmt
jsr .diagnos
add #4,sp
jsr __cleanup
jmp EXIT
.data