From a520ccdbbc6d776c866bf448168f1b97839aa143 Mon Sep 17 00:00:00 2001
From: bal <none@none>
Date: Thu, 19 Jul 1984 10:57:19 +0000
Subject: [PATCH] rcsid added clr.w -(sp) generated in prolog if register save
 mask is 0

---
 mach/m68k2/cg/mach.c | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/mach/m68k2/cg/mach.c b/mach/m68k2/cg/mach.c
index b286cf210..bff316602 100644
--- a/mach/m68k2/cg/mach.c
+++ b/mach/m68k2/cg/mach.c
@@ -1,3 +1,7 @@
+#ifndef NORCSID
+static char rcsid[] = "$Header$";
+#endif
+
 /*
  * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
  *
@@ -65,6 +69,7 @@ static int been_here;
 regscore(off,size,typ,score,totyp)
 	long off;
 {
+	if (score == 0) return -1;
 	switch(typ) {
 		case reg_float:
 			return -1;
@@ -147,7 +152,12 @@ save()
 	}
 	/* Push a mask that indicates which registers were saved */
 	assert(nr_d_regs < 8 && nr_a_regs < 8);
-	fprintf(codefile,"move.w #%d,-(sp)\n",nr_d_regs + (nr_a_regs<<3));
+	if (nr_d_regs == 0 && nr_a_regs == 0) {
+		fprintf(codefile,"clr.w -(sp)\n");
+	} else {
+		fprintf(codefile,"move.w #%d,-(sp)\n",
+			nr_d_regs + (nr_a_regs<<3));
+	}
 
 	/* Compute AB - LB */
 	EM_BSIZE = 4 * (nr_d_regs + nr_a_regs) + 10;
-- 
2.34.1