From 412a03787c87e217a68106bf33653519157b28cf Mon Sep 17 00:00:00 2001
From: Norayr Chilingarian <norayr@arnet.am>
Date: Wed, 11 Mar 2015 18:53:26 +0400
Subject: [PATCH] OPT cleanup.

Former-commit-id: d3b0c0352af1985bd23cce5e3b02475f75ae6f6d
---
 src/voc/OPT.Mod | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

diff --git a/src/voc/OPT.Mod b/src/voc/OPT.Mod
index ddb93cfc..4f7d2a05 100644
--- a/src/voc/OPT.Mod
+++ b/src/voc/OPT.Mod
@@ -1001,17 +1001,15 @@ WHILE ref < impCtxt.nofr DO
         OutObj(topScope^.right);
         ext := sfpresent & symExtended; new := ~sfpresent OR symNew;
 	IF OPM.forceNewSym THEN 
-	   new := TRUE;
-	   OPM.LogWStr("forceNewSym = TRUE"); OPM.LogWLn;
-	   END; (* for bootstrapping -- noch *)
+	   new := TRUE
+	END; (* for bootstrapping -- noch *)
         IF OPM.noerr & sfpresent & (impCtxt.reffp # expCtxt.reffp) THEN
           new := TRUE;
           IF ~extsf THEN err(155) END
         END ;
         newsf := FALSE; symNew := FALSE;  (* because of call to FPrintErr from OPL *)
         IF ~OPM.noerr OR findpc THEN 
-	   OPM.DeleteNewSym; 
-	   OPM.LogWStr("DeleteNewSym called"); OPM.LogWLn;   
+	   OPM.DeleteNewSym 
 	END
         (* OPM.RegisterNewSym is called in OP2 after writing the object file *)
       END