소스 검색

rtl: fix TTypeData comments

git-svn-id: trunk@24423 -
paul 12 년 전
부모
커밋
802b7db26e
1개의 변경된 파일2개의 추가작업 그리고 2개의 파일을 삭제
  1. 2 2
      rtl/objpas/typinfo.pp

+ 2 - 2
rtl/objpas/typinfo.pp

@@ -171,9 +171,9 @@ unit typinfo;
                   end;
               followed by
                   ResultType : ShortString     // for mkFunction, mkClassFunction only
-                  ResultTypeRef : PPTypeInfo;  // for mkFunction, mkClassFunction only
+                  ResultTypeRef : PTypeInfo;  // for mkFunction, mkClassFunction only
                   CC : TCallConv;
-                  ParamTypeRefs : array[1..ParamCount] of PPTypeInfo;}
+                  ParamTypeRefs : array[1..ParamCount] of PTypeInfo;}
               );
             tkInt64:
               (MinInt64Value, MaxInt64Value: Int64);