From 18639304e156f02128a71ba5a0ce036003f2b966 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Sun, 3 Jul 2016 21:18:19 +0000
Subject: [PATCH]   * convert the index for open arrays to ptr(u/s)inttype
 instead of to     (s/u)inttype (as in r32745)

git-svn-id: trunk@34057 -
---
 compiler/nmem.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/nmem.pas b/compiler/nmem.pas
index 9623020b4c..f5db84b5d6 100644
--- a/compiler/nmem.pas
+++ b/compiler/nmem.pas
@@ -933,9 +933,9 @@ implementation
                    begin
                      if is_signed(right.resultdef) and
                         not is_constnode(right) then
-                       inserttypeconv(right,sinttype)
+                       inserttypeconv(right,ptrsinttype)
                      else
-                       inserttypeconv(right,uinttype)
+                       inserttypeconv(right,ptruinttype)
                    end
                  else if is_special_array(left.resultdef) then
                    {Arrays without a high bound (dynamic arrays, open arrays) are zero based,