瀏覽代碼

* fixed thlcgobj.g_rangecheck() for cpuhighleveltarget when targetting a
cpu32bitalu

git-svn-id: trunk@41206 -

Jonas Maebe 6 年之前
父節點
當前提交
1abea6451c
共有 1 個文件被更改,包括 3 次插入1 次删除
  1. 3 1
      compiler/hlcgobj.pas

+ 3 - 1
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;