Browse Source

utils: use LongInt instead of Integer to prevent overflow

git-svn-id: trunk@26394 -
paul 11 years ago
parent
commit
75fecf9e96
1 changed files with 1 additions and 1 deletions
  1. 1 1
      utils/creumap.pp

+ 1 - 1
utils/creumap.pp

@@ -44,7 +44,7 @@ const
     var
        nef, oef : File of Byte;
        h, th : TSerializedMapHeader;
-       k : Integer;
+       k : Longint;
        um : tunicodecharmapping;
        pum : punicodecharmapping;
        rm : treversecharmapping;