paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 09:29:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fix compilation for unicode

Browse Source
This commit is contained in:
Michaël Van Canneyt 2025-01-31 17:27:57 +01:00
parent 3e6ae3f887
commit d06dd9532c
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
packages/wasm-job/src/job.js.pas
View File

@ -1334,7 +1334,7 @@ type
IJSAtomicAsyncWaitResult = Interface(IJSObject) ['{FCAA8244-08C2-4638-89F2-408473EC0096}'] IJSAtomicAsyncWaitResult = Interface(IJSObject) ['{FCAA8244-08C2-4638-89F2-408473EC0096}']
function getAsync : Boolean; function getAsync : Boolean;
function getValueAsString : String; function getValueAsString : UnicodeString;
function getValueAsPromise : IJSPromise; function getValueAsPromise : IJSPromise;
property Async : boolean read getAsync; property Async : boolean read getAsync;
property valueAsPromise : IJSPromise read GetValueAsPromise; property valueAsPromise : IJSPromise read GetValueAsPromise;
@ -1345,7 +1345,7 @@ type
TJSAtomicAsyncWaitResult = class(TJSObject,IJSAtomicAsyncWaitResult) TJSAtomicAsyncWaitResult = class(TJSObject,IJSAtomicAsyncWaitResult)
function getAsync : Boolean; function getAsync : Boolean;
function getValueAsString : String; function getValueAsString : UnicodeString;
function getValueAsPromise : IJSPromise; function getValueAsPromise : IJSPromise;
property Async : boolean read getAsync; property Async : boolean read getAsync;
property valueAsPromise : IJSPromise read GetValueAsPromise; property valueAsPromise : IJSPromise read GetValueAsPromise;
@ -1787,18 +1787,18 @@ begin
ReadJSPropertyBoolean('async'); ReadJSPropertyBoolean('async');
end; end;
function TJSAtomicAsyncWaitResult.getValueAsString: String; function TJSAtomicAsyncWaitResult.getValueAsString: UnicodeString;
begin begin
if getAsync then if getAsync then
Result:='' Result:=''
else else
Result:=ReadJSPropertyString('value'); Result:=ReadJSPropertyUnicodeString('value');
end; end;
function TJSAtomicAsyncWaitResult.getValueAsPromise: IJSPromise; function TJSAtomicAsyncWaitResult.getValueAsPromise: IJSPromise;
begin begin
if getAsync then if getAsync then
Result:=ReadJSPropertyObject('value',TJSPromise); Result:=ReadJSPropertyObject('value',TJSPromise) as IJSPromise
else else
Result:=Nil Result:=Nil
end; end;