diff --git a/packages/wasm-job/src/job.js.pas b/packages/wasm-job/src/job.js.pas index 040b8661a6..8c3036c22a 100644 --- a/packages/wasm-job/src/job.js.pas +++ b/packages/wasm-job/src/job.js.pas @@ -6,7 +6,7 @@ see https://wiki.freepascal.org/WebAssembly/DOM } {$IFNDEF FPC_DOTTEDUNITS} -unit JOB.Js; +unit job.js; {$ENDIF} {$mode ObjFPC} @@ -753,6 +753,7 @@ type TJSUint8Array = class(TJSTypedArray,IJSUint8Array) public + Class function GetGlobal : TJSUint8Array; class function JSClassName: UnicodeString; override; class function Cast(const Intf: IJSObject): IJSUint8Array; overload; end; @@ -1485,6 +1486,13 @@ end; { TJSUInt8Array } +class function TJSUint8Array.GetGlobal: TJSUint8Array; +begin + // We must free it. + Result:=TJSUInt8Array.JOBCreateGlobal('InstanceMemory'); + TJSUInt8Array(Result).FJOBObjectIDOwner:=True; +end; + class function TJSUint8Array.JSClassName: UnicodeString; begin Result:='Uint8Array';