From 29202fe224e85c4479159ed029b7d0038bdd9a4b Mon Sep 17 00:00:00 2001
From: sater <none@none>
Date: Thu, 17 May 1984 13:56:00 +0000
Subject: [PATCH] added rcsid Changed register message output to terminate with
 ms_gto, if input   procedure contained one.

---
 util/opt/reg.c | 11 +++++++++--
 1 file changed, 9 insertions(+), 2 deletions(-)

diff --git a/util/opt/reg.c b/util/opt/reg.c
index 209e1d6d1..643fb9539 100644
--- a/util/opt/reg.c
+++ b/util/opt/reg.c
@@ -1,3 +1,7 @@
+#ifndef NORCSID
+static char rcsid[] = "$Header$";
+#endif
+
 #include "assert.h"
 #include "param.h"
 #include "types.h"
@@ -76,9 +80,12 @@ outregs() {
 		}
 		oldreg(rp);
 	}
-	/* Now an empty mes 3 to signal the end. */
+	/* List of register messages is followed by an empty ms_reg
+	 * unless an ms_gto was in this procedure, then the ms_gto
+	 * will be output. Kludgy.
+	 */
 	outinst(ps_mes);
-	outoff((offset)ms_reg);
+	outoff((offset)(curpro.gtoproc? ms_gto : ms_reg));
 	outinst(sp_cend);
 	curpro.freg = (reg_p) 0;
 }
-- 
2.34.1