From 75c18ef56cd00d7f0476e3f182403ccae229722c Mon Sep 17 00:00:00 2001 From: ceriel Date: Tue, 21 Feb 1989 10:09:01 +0000 Subject: [PATCH] changed entry points csa and csb; strscript should call m68020 instead of acc --- mach/m68020/libem/csa.s | 5 +++-- mach/m68020/libem/csb.s | 5 +++-- mach/m68020/libem/strscript | 2 +- 3 files changed, 7 insertions(+), 5 deletions(-) diff --git a/mach/m68020/libem/csa.s b/mach/m68020/libem/csa.s index b540a2e74..b6e117e24 100644 --- a/mach/m68020/libem/csa.s +++ b/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 diff --git a/mach/m68020/libem/csb.s b/mach/m68020/libem/csb.s index 550f496c9..fe2d9d690 100644 --- a/mach/m68020/libem/csb.s +++ b/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 diff --git a/mach/m68020/libem/strscript b/mach/m68020/libem/strscript index 51b62fd45..ee4cc1b41 100644 --- a/mach/m68020/libem/strscript +++ b/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 -- 2.34.1