From aefe1fb5d1061c084db47cd81182c6aa89152e8f Mon Sep 17 00:00:00 2001
From: jonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2>
Date: Sun, 3 Feb 2019 21:01:08 +0000
Subject:   * fixed thlcgobj.g_rangecheck() for cpuhighleveltarget when
 targetting a     cpu32bitalu

git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@41206 3ad0048d-3df7-0310-abae-a5850022a9f2
---
 compiler/hlcgobj.pas | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'compiler/hlcgobj.pas')

diff --git a/compiler/hlcgobj.pas b/compiler/hlcgobj.pas
index f7484df974..82d72bdcfb 100644
--- a/compiler/hlcgobj.pas
+++ b/compiler/hlcgobj.pas
@@ -3502,7 +3502,9 @@ implementation
 
   procedure thlcgobj.g_rangecheck(list: TAsmList; const l: tlocation; fromdef, todef: tdef);
     var
-{$if defined(cpu64bitalu) or defined(cpu32bitalu)}
+{$if defined(cpuhighleveltarget)}
+      aintmax: tcgint;
+{$elseif defined(cpu64bitalu) or defined(cpu32bitalu)}
       aintmax: aint;
 {$else}
       aintmax: longint;
-- 
cgit v1.2.1