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