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

changed entry points csa and csb; strscript should call m68020

Browse source 
instead of acc
This commit is contained in:
ceriel 1989-02-21 10:09:01 +00:00
parent 432cf9054d
commit 75c18ef56c
3 changed files with 7 additions and 5 deletions
mach/m68020/libem
csa.scsb.sstrscript

5
mach/m68020/libem/csa.s
View file

@ -8,9 +8,10 @@ ECASE=20
.sect .text .sect .text
.csa: .csa:
move.l (sp)+, a0 ! jump table address ! jump table address in a0
! index in d0
move.l (a0)+, a1 ! default address move.l (a0)+, a1 ! default address
move.l (sp)+, d0 ! index
sub.l (a0)+, d0 ! index - lower bound sub.l (a0)+, d0 ! index - lower bound
blt 1f blt 1f
cmp.l (a0)+, d0 ! rel. index, upper - lower bound cmp.l (a0)+, d0 ! rel. index, upper - lower bound

5
mach/m68020/libem/csb.s
View file

@ -8,8 +8,9 @@ ECASE=20
.sect .text .sect .text
.csb: .csb:
move.l (sp)+, a0 ! case descriptor ! case descriptor in a0
move.l (sp)+, d0 ! index ! index in d0
move.l (a0)+, a1 ! default jump address move.l (a0)+, a1 ! default jump address
move.l (a0)+, d1 ! # entries move.l (a0)+, d1 ! # entries
beq 3f beq 3f

2
mach/m68020/libem/strscript
View file

@ -1,3 +1,3 @@
acc -c.s -L -LIB -I../../../h trpstr.c m68020 -c.s -L -LIB -I../../../h trpstr.c
sed s/_trpstr/.trpstr/g < trpstr.s > trpstr.ss sed s/_trpstr/.trpstr/g < trpstr.s > trpstr.ss
mv trpstr.ss trpstr.s mv trpstr.ss trpstr.s