vishapoberon/compiler
1
0
Fork 0
mirror of https://github.com/vishapoberon/compiler.git synced 2026-04-06 19:12:25 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

OPT cleanup.

Browse source
This commit is contained in:
Norayr Chilingarian 2015-03-11 18:53:26 +04:00
parent a2e64ff15f
commit d3b0c0352a
1 changed files with 3 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/voc/OPT.Mod
View file

@ -1001,8 +1001,7 @@ 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;
new := TRUE
END; (* for bootstrapping -- noch *)
IF OPM.noerr & sfpresent & (impCtxt.reffp # expCtxt.reffp) THEN
new := TRUE;
@ -1010,8 +1009,7 @@ WHILE ref < impCtxt.nofr DO
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