Bladeren bron

changed entry points csa and csb; strscript should call m68020
instead of acc

ceriel 35 jaren geleden
bovenliggende
commit
f295a15614
3 gewijzigde bestanden met toevoegingen van 7 en 5 verwijderingen
  1. 3 2
      mach/m68020/libem/csa.s
  2. 3 2
      mach/m68020/libem/csb.s
  3. 1 1
      mach/m68020/libem/strscript

+ 3 - 2
mach/m68020/libem/csa.s

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

+ 3 - 2
mach/m68020/libem/csb.s

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

+ 1 - 1
mach/m68020/libem/strscript

@@ -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
 mv trpstr.ss trpstr.s