From: sater <none@none>
Date: Thu, 17 May 1984 13:56:00 +0000 (+0000)
Subject: added rcsid
X-Git-Tag: release-5-5~6289
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=29202fe224e85c4479159ed029b7d0038bdd9a4b;p=ack.git

added rcsid
Changed register message output to terminate with ms_gto, if input
  procedure contained one.
---

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;
 }