summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorpierre <pierre@3ad0048d-3df7-0310-abae-a5850022a9f2>2021-04-27 14:01:35 +0000
committerpierre <pierre@3ad0048d-3df7-0310-abae-a5850022a9f2>2021-04-27 14:01:35 +0000
commit140cd7445bcd9103090414e9223d11354a8de1c9 (patch)
tree16232e157774a8bc85bcc2e7d50c795333e86d38
parentbfc3606704a7cb4c77a9d999ed6f8419d01e6244 (diff)
downloadfpc-140cd7445bcd9103090414e9223d11354a8de1c9.tar.gz
Avoid range check error inside genitem_thumb2 by changing local variable i type
git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@49278 3ad0048d-3df7-0310-abae-a5850022a9f2
-rw-r--r--compiler/arm/narmset.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/arm/narmset.pas b/compiler/arm/narmset.pas
index 4d0c2cb5ca..3bb9ecd471 100644
--- a/compiler/arm/narmset.pas
+++ b/compiler/arm/narmset.pas
@@ -191,7 +191,7 @@ implementation
procedure genitem_thumb2(list:TAsmList;t : pcaselabel);
var
- i : aint;
+ i : int64;
begin
if assigned(t^.less) then
genitem_thumb2(list,t^.less);