mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 12:29:25 +02:00
[PATCH 090/188] writing big u64 as signed 64
From ae0d84b14f391f100fe5c8c34a1dbbaa72722972 Mon Sep 17 00:00:00 2001 From: Dmitry Boyarintsev <skalogryz.lists@gmail.com> Date: Tue, 10 Mar 2020 08:46:24 -0400 git-svn-id: branches/wasm@46086 -
This commit is contained in:
parent
c8d83674a9
commit
eb54cf7163
@ -491,7 +491,7 @@ begin
|
||||
//u64 := UInt64(i64)
|
||||
end else begin
|
||||
Val(operand, u64, err);
|
||||
if Result then WriteU64(dst, u64);
|
||||
if Result then WriteS64(dst, Int64(u64));
|
||||
end;
|
||||
Result := (err = 0);
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user