summaryrefslogtreecommitdiff
path: root/compiler/pdecvar.pas
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/pdecvar.pas')
-rw-r--r--compiler/pdecvar.pas4
1 files changed, 4 insertions, 0 deletions
diff --git a/compiler/pdecvar.pas b/compiler/pdecvar.pas
index 85c47b5132..57f2cf5c1f 100644
--- a/compiler/pdecvar.pas
+++ b/compiler/pdecvar.pas
@@ -1707,6 +1707,10 @@ implementation
hdef:=generrordef;
end;
+ { field type is a generic param so set a flag in the struct }
+ if assigned(hdef.typesym) and (sp_generic_para in hdef.typesym.symoptions) then
+ include(current_structdef.defoptions,df_has_generic_fields);
+
{ Process procvar directives }
if maybe_parse_proc_directives(hdef) then
semicoloneaten:=true;