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:41:21 +01:00
parent 6bba60ec8a
commit 8275bfe7c7
1 changed files with 0 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
packages/wasm-oi/src/debug.objectinspector.wasm.pas
View File

@ -220,9 +220,6 @@ end;
function TWasmObjectInspectorApi.InspectorAllocate(aID: TWasmPointer): TWasmOIResult;
var
v : TJSDataView;
begin
{$IFNDEF NOLOGAPICALLS}
If LogAPICalls then
@ -231,16 +228,10 @@ begin
end;
{$ENDIF}
Result:=WASMOI_NOT_IMPLEMENTED;
{ v:=getModuleMemoryDataView;
v.setInt32(aID,0,Env.IsLittleEndian);
}
end;
function TWasmObjectInspectorApi.InspectorDeAllocate(aID: TInspectorID): TWasmOIResult;
var
v : TJSDataView;
begin
{$IFNDEF NOLOGAPICALLS}
If LogAPICalls then
@ -249,21 +240,16 @@ begin
end;
{$ENDIF}
Result:=WASMOI_NOT_IMPLEMENTED;
{ v:=getModuleMemoryDataView;
v.setInt32(aID,0,Env.IsLittleEndian);
}
end;
function TWasmObjectInspectorApi.InspectorSetCaption(aInspectorID: TInspectorID; aCaption: TWasmPointer; aCaptionLen: Longint
): TWasmOIResult;
var
V : TJSDataView;
OI : THTMLObjectInspector;
lCaption : String;
begin
V:=getModuleMemoryDataView;
lCaption:=Env.GetUTF8StringFromMem(aCaption,aCaptionLen);
{$IFNDEF NOLOGAPICALLS}
If LogAPICalls then
@ -350,12 +336,10 @@ end;
function TWasmObjectInspectorApi.TreeSetCaption(aInspectorID: TInspectorID; aCaption: TWasmPointer; aCaptionLen: Longint
): TWasmOIResult;
var
V : TJSDataView;
T : THTMLObjectTree;
lCaption : String;
begin
V:=getModuleMemoryDataView;
lCaption:=Env.GetUTF8StringFromMem(aCaption,aCaptionLen);
{$IFNDEF NOLOGAPICALLS}
If LogAPICalls then
@ -396,7 +380,6 @@ function TWasmObjectInspectorApi.InspectorAddProperty(aInspectorID: TInspectorID
var
PropertyKind : TNativeTypeKind;
PropertyFlags : Longint;
PropDataFlags : TPropDataFlags;
V : TJSDataView;
OI : THTMLObjectInspector;
PropData : TOIPropData;