mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-04 20:30:40 +02:00
pastojs: fixed test vql on 32bit system
git-svn-id: trunk@38723 -
This commit is contained in:
parent
b780c20096
commit
b21462d3b1
@ -1531,7 +1531,7 @@ procedure TTestPrecompile.Test_Base256VLQ;
|
||||
var
|
||||
s: String;
|
||||
p: PByte;
|
||||
j: NativeInt;
|
||||
j: MaxPrecInt;
|
||||
begin
|
||||
s:=EncodeVLQ(i);
|
||||
p:=PByte(s);
|
||||
|
Loading…
Reference in New Issue
Block a user