diff --git a/rtl/inc/objpash.inc b/rtl/inc/objpash.inc index 6af274f07d..405e0fc83a 100644 --- a/rtl/inc/objpash.inc +++ b/rtl/inc/objpash.inc @@ -125,7 +125,11 @@ IOffset : ptruint; IIDStr : pshortstring; { never nil. Com: upper(GuidToString(IID^)) } case boolean of +{$ifdef ENDIAN_BIG} + true : ({$IFDEF CPU64}__pad: longint;{$ENDIF}IType : tinterfaceentrytype); +{$else ENDIAN_BIG} true : (IType : tinterfaceentrytype); +{$endif ENDIAN_BIG} false : (__pad_dummy : pointer); end;