./trunk/gcc420/vcs_diff_rtl.patch 2026-07-05-09:27
diff --git a/rtl/inc/objpash.inc b/rtl/inc/objpash.inc
index bed883454c..1e22661a36 100644
--- a/rtl/inc/objpash.inc
+++ b/rtl/inc/objpash.inc
@@ -266,8 +266,10 @@ TObject = class
AllocateObjectHook : TObjectHook;
DestroyObjectHook : TObjectHook;
{$ENDIF}
+{$IFDEF FPC_DOTTEDUNITS}
public
const SystemHasExtendedRTTI = {$IFDEF ENABLE_DELPHI_RTTI}True{$ELSE}False{$ENDIF};
+{$ENDIF}
public
{ please don't change the order of virtual methods, because