From 479d45d2d977314c167cc282589503761d052e86 Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Wed, 20 May 1987 14:51:02 +0000
Subject: [PATCH] Added modula, -L was passed twice to peephole optimizer

---
 lib/descr/fe.src | 2 +-
 lib/descr/int    | 7 +++++--
 2 files changed, 6 insertions(+), 3 deletions(-)

diff --git a/lib/descr/fe.src b/lib/descr/fe.src
index d5ebc7db1..6b6214a4a 100644
--- a/lib/descr/fe.src
+++ b/lib/descr/fe.src
@@ -158,7 +158,7 @@ name opt2
 	from .gk
 	to .g
 	program {EM}/lib/em_opt2
-	mapflag -LIB OPT_F={OPT_F?} -L
+#	mapflag -LIB OPT_F={OPT_F?} -L
 	args {OPT_F?} <
 	optimizer
 	stdout
diff --git a/lib/descr/int b/lib/descr/int
index 36e2ff63d..a4043e7b4 100644
--- a/lib/descr/int
+++ b/lib/descr/int
@@ -22,11 +22,14 @@ name asld
 	mapflag --* ASS_F={ASS_F?} --*
 	mapflag -s* SIZE_FLAG=-s*
 	args {SIZE_FLAG} \
-		({RTS}:.ocm.b.c={EM}/{RT}cc) ({RTS}:.p={EM}/{RT}pc) -o > < \
+		({RTS}:.ocm.b.c={EM}/{RT}cc) \
+		({RTS}:.mod={EM}/{RT}m2) \
+		({RTS}:.p={EM}/{RT}pc) -o > < \
 		(.p:{TAIL}={EM}/{LIB}pc) \
 		(.b:{TAIL}={EM}/{LIB}bc) \
 		(.ocm:{TAIL}={EM}/{LIB}ocm) \
+		(.mod:{TAIL}={EM}/{LIB}m2) \
 		(.ocm.b.c:{TAIL}={EM}/{LIB}cc.1s {EM}/{LIB}cc.2g) \
-		(.ocm.b.c.p:{TAIL}={EM}/{LIB}mon)
+		(.mod.ocm.b.c.p:{TAIL}={EM}/{LIB}mon)
 	linker
 end
-- 
2.34.1