From 94728254789f813abdc29dee0f6da8ca849f889e Mon Sep 17 00:00:00 2001
From: yury <jura@cp-lab.com>
Date: Sat, 12 Apr 2008 11:46:04 +0000
Subject: [PATCH] * Fixed warnings.

git-svn-id: trunk@10630 -
---
 rtl/inc/system.inc | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/rtl/inc/system.inc b/rtl/inc/system.inc
index 7777a8eb94..0ea21316f6 100644
--- a/rtl/inc/system.inc
+++ b/rtl/inc/system.inc
@@ -453,12 +453,12 @@ Type
 const
   MT19937M=397;
   MT19937MATRIX_A  =$9908b0df;  // constant vector a
-  MT19937UPPER_MASK=$80000000;  // most significant w-r bits
-  MT19937LOWER_MASK=$7fffffff;  // least significant r bits
+  MT19937UPPER_MASK=longint($80000000);  // most significant w-r bits
+  MT19937LOWER_MASK=longint($7fffffff);  // least significant r bits
 
 { Tempering parameters }
-  TEMPERING_MASK_B=$9d2c5680;
-  TEMPERING_MASK_C=$efc60000;
+  TEMPERING_MASK_B=longint($9d2c5680);
+  TEMPERING_MASK_C=longint($efc60000);
 
 
 VAR