Explorar el Código

pastojs: fixed test vql on 32bit system

git-svn-id: trunk@38723 -
Mattias Gaertner hace 7 años
padre
commit
b21462d3b1
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  1. 1 1
      packages/pastojs/tests/tcfiler.pas

+ 1 - 1
packages/pastojs/tests/tcfiler.pas

@@ -1531,7 +1531,7 @@ procedure TTestPrecompile.Test_Base256VLQ;
   var
     s: String;
     p: PByte;
-    j: NativeInt;
+    j: MaxPrecInt;
   begin
     s:=EncodeVLQ(i);
     p:=PByte(s);