mirror of
https://gitlab.com/freepascal.org/fpc/pas2js.git
synced 2025-08-28 17:00:17 +02:00
* JOBCallback exists in job.js.pas
This commit is contained in:
parent
3055de55dd
commit
80f9f00aa3
@ -55,15 +55,6 @@ begin
|
|||||||
writeln('TWasmApp.Run END');
|
writeln('TWasmApp.Run END');
|
||||||
end;
|
end;
|
||||||
|
|
||||||
// workaround: fpc wasm does not yet support exporting functions from units
|
|
||||||
function JOBCallback(const Func: TJOBCallback; Data, Code: Pointer; Args: PByte): PByte;
|
|
||||||
begin
|
|
||||||
Result:=JOB.JS.JOBCallback(Func,Data,Code,Args);
|
|
||||||
end;
|
|
||||||
|
|
||||||
exports
|
|
||||||
JOBCallback;
|
|
||||||
|
|
||||||
var
|
var
|
||||||
Application: TWasmApp;
|
Application: TWasmApp;
|
||||||
begin
|
begin
|
||||||
|
@ -1231,15 +1231,6 @@ begin
|
|||||||
WriteJSPropertyLongInt('Size',AValue);
|
WriteJSPropertyLongInt('Size',AValue);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
// workaround: fpc wasm does not yet support exporting functions from units
|
|
||||||
function JOBCallback(const Func: TJOBCallback; Data, Code: Pointer; Args: PByte): PByte;
|
|
||||||
begin
|
|
||||||
Result:=JOB.JS.JOBCallback(Func,Data,Code,Args);
|
|
||||||
end;
|
|
||||||
|
|
||||||
exports
|
|
||||||
JOBCallback;
|
|
||||||
|
|
||||||
var
|
var
|
||||||
Application: TWasmApp;
|
Application: TWasmApp;
|
||||||
begin
|
begin
|
||||||
|
Loading…
Reference in New Issue
Block a user