Michaël Van Canneyt пре 2 година
родитељ
комит
4d66ac9118
1 измењених фајлова са 1 додато и 0 уклоњено
  1. 1 0
      rtl/objpas/typinfo.pp

+ 1 - 0
rtl/objpas/typinfo.pp

@@ -339,6 +339,7 @@ unit TypInfo;
         Name: ShortString;
       end;
 
+      PProcedureSignature = ^TProcedureSignature;
       TProcedureSignature =
       {$ifndef FPC_REQUIRES_PROPER_ALIGNMENT}
       packed