paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-20 11:29:22 +02:00
Code Issues Packages Projects Releases Wiki Activity

* BuildSourceList allways called for dependency in FP

Browse Source
This commit is contained in:
pierre 1999-09-16 07:54:48 +00:00
parent cac8e59f0f
commit e4d44f4281
1 changed files with 12 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
compiler/browcol.pas
View File

@ -1273,8 +1273,10 @@ var
hp : pmodule; hp : pmodule;
begin begin
DisposeBrowserCol; DisposeBrowserCol;
if (cs_browser in aktmoduleswitches) then
NewBrowserCol; NewBrowserCol;
hp:=pmodule(loaded_units.first); hp:=pmodule(loaded_units.first);
if (cs_browser in aktmoduleswitches) then
while assigned(hp) do while assigned(hp) do
begin begin
t:=psymtable(hp^.globalsymtable); t:=psymtable(hp^.globalsymtable);
@ -1292,8 +1294,10 @@ begin
end; end;
hp:=pmodule(hp^.next); hp:=pmodule(hp^.next);
end; end;
if (cs_browser in aktmoduleswitches) then
BuildObjectInfo; BuildObjectInfo;
{ can allways be done
needed to know when recompilation of sources is necessary }
BuildSourceList; BuildSourceList;
end; end;
@ -1692,7 +1696,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.23 1999-09-07 15:07:49 pierre Revision 1.24 1999-09-16 07:54:48 pierre
* BuildSourceList allways called for dependency in FP
Revision 1.23 1999/09/07 15:07:49 pierre
* avoid some infinite recursions * avoid some infinite recursions
Revision 1.22 1999/08/16 18:25:49 peter Revision 1.22 1999/08/16 18:25:49 peter