* allow for AlignTypeData() to be inlined

git-svn-id: trunk@35322 -

rtl/objpas/typinfo.pp

@@ -495,7 +495,7 @@ unit typinfo;
 
 // general property handling
 Function GetTypeData(TypeInfo : PTypeInfo) : PTypeData;
-Function AlignTypeData(p : Pointer) : Pointer;
+Function AlignTypeData(p : Pointer) : Pointer; inline;
 
 Function GetPropInfo(TypeInfo: PTypeInfo;const PropName: string): PPropInfo;
 Function GetPropInfo(TypeInfo: PTypeInfo;const PropName: string; AKinds: TTypeKinds): PPropInfo;