From cb804b16cb695eb08e3896e615c4a5a454ddb43e Mon Sep 17 00:00:00 2001
From: Norayr Chilingarian <norayr@arnet.am>
Date: Sat, 5 Oct 2013 22:40:38 +0400
Subject: [PATCH] -MC now works, does not compile main unit by default, but
 creates object file and don't link it.

---
 src/voc/voc.Mod | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/voc/voc.Mod b/src/voc/voc.Mod
index dd23f9cd..05b971a3 100644
--- a/src/voc/voc.Mod
+++ b/src/voc/voc.Mod
@@ -65,13 +65,13 @@ VAR mname : ARRAY 256 OF CHAR; (* noch *)
 (* noch *)
         IF done THEN
 	  IF ~OPM.dontAsm THEN
-	     IF ~(OPM.mainProg OR OPM.mainLinkStat) THEN
+	     (*IF ~(OPM.mainProg OR OPM.mainLinkStat) THEN*)
 	        extTools.Assemble(OPM.modName);
-	     ELSE
-                IF ~OPM.dontLink THEN
+	     (*ELSE*)
+                IF ~OPM.dontLink & (OPM.mainProg OR OPM.mainLinkStat) THEN
                    extTools.LinkMain (OPM.modName, OPM.mainLinkStat);
 		END;
-	     END;
+	     (*END;*)
 	  END;
 	END