* Add ptr types for fixed(u)int, fixes #40205

(cherry picked from commit 33071fd1792a7430f8a6a83abde1c2a56ebe63be)

rtl/objpas/objpas.pp

@@ -56,8 +56,11 @@ interface
        PPointerArray = ^PointerArray;
 
        // Delphi Berlin compatibility 
-       FixedInt = Int32;
+       FixedInt  = Int32;
        FixedUInt = UInt32;
+       PFixedInt = ^FixedInt;
+       PFixedUInt= ^FixedUInt;
+   
        
 {$if FPC_FULLVERSION >= 20701}