From 93b20a04177e1bf75f344b215c78b91c781159bd Mon Sep 17 00:00:00 2001 From: Ken Harrison Date: Fri, 14 Oct 1983 01:31:48 -0800 Subject: [PATCH] format error raised havoc with binary searched cases SCCS-vsn: usr.bin/pascal/src/pccaseop.c 1.13 --- usr/src/usr.bin/pascal/src/pccaseop.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/usr/src/usr.bin/pascal/src/pccaseop.c b/usr/src/usr.bin/pascal/src/pccaseop.c index 9a7dec077c..eef8d89bef 100644 --- a/usr/src/usr.bin/pascal/src/pccaseop.c +++ b/usr/src/usr.bin/pascal/src/pccaseop.c @@ -1,6 +1,6 @@ /* Copyright (c) 1980 Regents of the University of California */ -static char sccsid[] = "@(#)pccaseop.c 1.12 %G%"; +static char sccsid[] = "@(#)pccaseop.c 1.13 %G%"; #include "whoami.h" #ifdef PC @@ -382,7 +382,7 @@ bsrecur( deflabel , ctab , count ) # endif vax # ifdef mc68000 putprintf(" cmpl #%d,%s", 0, ctab[1].cconst, FORCENAME); - putprintf(" jeq L%d", 0, LABELPREFIX, ctab[1].clabel); + putprintf(" jeq %s%d", 0, LABELPREFIX, ctab[1].clabel); putjbr(deflabel); # endif mc68000 return; -- 2.20.1