From 4f02942b55672dd133c92882c7e1185c3d5a982c Mon Sep 17 00:00:00 2001
From: michael <michael@freepascal.org>
Date: Sat, 11 Mar 2017 09:26:57 +0000
Subject: [PATCH] * Fix bug #31526, missing FixedInt FixedUInt from Delphi
 Berlin

git-svn-id: trunk@35560 -
---
 rtl/objpas/objpas.pp | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/rtl/objpas/objpas.pp b/rtl/objpas/objpas.pp
index 21a65ae0b3..672719e064 100644
--- a/rtl/objpas/objpas.pp
+++ b/rtl/objpas/objpas.pp
@@ -57,7 +57,10 @@ interface
        TBoundArray = array of integer;
 
 
-
+       // Delphi Berlin compatibility 
+       FixedInt = Int32;
+       FixedUInt = UInt32;
+       
 {$if FPC_FULLVERSION >= 20701}
 
       { Generic array type.