|
@@ -750,6 +750,8 @@ implementation
|
|
{ other types should not appear currently, add as needed }
|
|
{ other types should not appear currently, add as needed }
|
|
internalerror(2014012008);
|
|
internalerror(2014012008);
|
|
end;
|
|
end;
|
|
|
|
+ pointerdef:
|
|
|
|
+ typename:='p'+tostr(hdef.deflist_index);
|
|
else
|
|
else
|
|
{ other types should not appear currently, add as needed }
|
|
{ other types should not appear currently, add as needed }
|
|
internalerror(2014012009);
|
|
internalerror(2014012009);
|