paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-04-05 11:17:45 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Remove some unused variables

Browse Source
This commit is contained in:
Michael Van Canneyt 2025-01-23 11:33:38 +01:00
parent addc99923d
commit 66b4f8d4fe
1 changed files with 1 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
packages/job/src/job_browser.pp
View File

@ -127,8 +127,6 @@ Type
Implementation
uses math;
function NewObj(const fn: TJSFunction; const Args: TJSValueDynArray): TJSFunction; assembler;
asm
@ -366,8 +364,6 @@ begin
end;
function TJSObjectBridge.DecodeUTF8Buffer(Arr: TJSUint8Array): String;
var
enc : string;
begin
if FDecoderUTF8=Nil then
@ -791,6 +787,7 @@ begin
Result:=JOBResult_Success;
end;
end;
if aFlags=0 then ;
end;
function TJSObjectBridge.ReleaseStringResult: TJOBResult;
@ -818,7 +815,6 @@ var
var
aCall, aData, aCode: TWasmNativeInt;
Obj : TJSObject absolute Result;
ReRaise : Boolean;
function MethodCallBack: jsvalue;
@ -956,7 +952,6 @@ var
function ReadArgArrayOfByte: JSValue;
var
Cnt, El: TWasmNativeInt;
i: Integer;
begin
Cnt:=ReadWasmNativeInt;