Browse Source

* fix for #32352: a unit does not need to be re-deref'ed if it just had been recompiled

git-svn-id: trunk@44026 -
florian 5 years ago
parent
commit
90a40ab9ca
1 changed files with 3 additions and 1 deletions
  1. 3 1
      compiler/fppu.pas

+ 3 - 1
compiler/fppu.pas

@@ -2046,7 +2046,9 @@ var
              begin
              begin
                { When we don't have any data stored yet there
                { When we don't have any data stored yet there
                  is nothing to resolve }
                  is nothing to resolve }
-               if interface_compiled then
+               if interface_compiled and
+                 { it makes no sense to re-resolve the unit if it is already finally compiled }
+                 not(state=ms_compiled) then
                  begin
                  begin
                    Message1(unit_u_reresolving_unit,modulename^);
                    Message1(unit_u_reresolving_unit,modulename^);
                    tstoredsymtable(globalsymtable).deref(false);
                    tstoredsymtable(globalsymtable).deref(false);