summaryrefslogtreecommitdiff
path: root/packages/fcl-passrc/src/pasuseanalyzer.pas
diff options
context:
space:
mode:
Diffstat (limited to 'packages/fcl-passrc/src/pasuseanalyzer.pas')
-rw-r--r--packages/fcl-passrc/src/pasuseanalyzer.pas1
1 files changed, 1 insertions, 0 deletions
diff --git a/packages/fcl-passrc/src/pasuseanalyzer.pas b/packages/fcl-passrc/src/pasuseanalyzer.pas
index 54a45c93ff..2a9ab54a24 100644
--- a/packages/fcl-passrc/src/pasuseanalyzer.pas
+++ b/packages/fcl-passrc/src/pasuseanalyzer.pas
@@ -2471,6 +2471,7 @@ begin
if Param is TPasGenericTemplateType then continue;
UseElement(Param,rraRead,false);
end;
+ UseElType(El,El.SubType,Mode);
end;
procedure TPasAnalyzer.UseVariable(El: TPasVariable;