diff --git a/rtl/inc/objpash.inc b/rtl/inc/objpash.inc
index edbf6fb740..ea59dc631e 100644
--- a/rtl/inc/objpash.inc
+++ b/rtl/inc/objpash.inc
@@ -192,6 +192,7 @@
          Entries    : array[0..0] of tinterfaceentry;
        end;
 
+       PMethod = ^TMethod;
        TMethod = record
          Code : CodePointer;
          Data : Pointer;