Przeglądaj źródła

* raw interfaces are not handled through IValueData so correctly return their size in GetDataSize

git-svn-id: trunk@37064 -
svenbarth 8 lat temu
rodzic
commit
621316c6dc
1 zmienionych plików z 2 dodań i 2 usunięć
  1. 2 2
      packages/rtl-objpas/src/inc/rtti.pp

+ 2 - 2
packages/rtl-objpas/src/inc/rtti.pp

@@ -690,6 +690,7 @@ begin
       tkClass,
       tkHelper,
       tkClassRef,
+      tkInterfaceRaw,
       tkPointer:
         Result := SizeOf(Pointer);
       tkUnknown,
@@ -701,8 +702,7 @@ begin
       tkArray,
       tkRecord,
       tkInterface,
-      tkDynArray,
-      tkInterfaceRaw:
+      tkDynArray:
         Assert(False);
     end;
   end;