Przeglądaj źródła

* fixed module index updating, resolves #7883

git-svn-id: trunk@6623 -
florian 18 lat temu
rodzic
commit
199ab92eb8
1 zmienionych plików z 1 dodań i 1 usunięć
  1. 1 1
      compiler/verbose.pas

+ 1 - 1
compiler/verbose.pas

@@ -401,7 +401,7 @@ var
              lastfileidx:=current_filepos.fileindex
              lastfileidx:=current_filepos.fileindex
            else
            else
              lastfileidx:=0;
              lastfileidx:=0;
-           lastmoduleidx:=compiling_module.unit_index;
+           lastmoduleidx:=module.unit_index;
          end;
          end;
         if assigned(module) then
         if assigned(module) then
           status.compiling_current:=(compiling_module.state in [ms_compile,ms_second_compile]);
           status.compiling_current:=(compiling_module.state in [ms_compile,ms_second_compile]);