* in the vecnode, when indexing a pointer[], convert right to

  tpointerdef.pointer_arithmetic_int_type instead of sinttype

git-svn-id: trunk@28269 -

compiler/nmem.pas

@@ -946,8 +946,10 @@ implementation
                else
                  {Convert indexes into dynamically allocated strings to aword.}
                  inserttypeconv(right,uinttype);
+             pointerdef:
+               inserttypeconv(right,tpointerdef(left.resultdef).pointer_arithmetic_int_type);
              else
-               {Others, i.e. pointer indexes to aint.}
+               {Others, (are there any?) indexes to aint.}
                inserttypeconv(right,sinttype);
            end;