mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-16 21:09:30 +02:00
codetools: move StoreNodeHash to SetNode. See r51650 #a5cd34a174
git-svn-id: trunk@51651 -
This commit is contained in:
parent
a5cd34a174
commit
263929eb6c
@ -3528,9 +3528,6 @@ begin
|
||||
and (FToolNodesDeletedStep<>Tool.NodesDeletedChangeStep) then
|
||||
Exclude(Flags,iliNodeValid);
|
||||
|
||||
if (Flags * [iliNodeHashValid, iliNodeValid] = [iliNodeValid]) then
|
||||
StoreNodeHash;
|
||||
|
||||
if (not (iliNodeValid in Flags)) then begin
|
||||
if iliNodeHashValid in Flags then begin
|
||||
RestoreNode;
|
||||
@ -3566,6 +3563,8 @@ begin
|
||||
RaiseToolMissing;
|
||||
if (Tool<>nil) then
|
||||
FToolNodesDeletedStep:=Tool.NodesDeletedChangeStep;
|
||||
if (FNode<>nil) then
|
||||
StoreNodeHash;
|
||||
end;
|
||||
|
||||
procedure TIdentifierListItem.SetParamTypeList(const AValue: string);
|
||||
|
Loading…
Reference in New Issue
Block a user