paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-10 01:08:35 +02:00
Code Issues Packages Projects Releases Wiki Activity

* TWasmObjData.DeclareLocal renamed DeclareLocals. No functional changes.

Browse Source
This commit is contained in:
Nikolay Nikolov 2024-09-15 01:03:56 +03:00
parent b9ca30165c
commit 80523e192a
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/assemble.pas
View File

@ -1952,7 +1952,7 @@ Implementation
ait_import_name:
TWasmObjData(ObjData).DeclareImportName(tai_import_name(hp));
ait_local:
TWasmObjData(ObjData).DeclareLocal(tai_local(hp));
TWasmObjData(ObjData).DeclareLocals(tai_local(hp));
{$endif WASM}
else
;

4
compiler/ogwasm.pas
View File

@ -180,7 +180,7 @@ interface
procedure DeclareExportName(en: tai_export_name);
procedure DeclareImportModule(aim: tai_import_module);
procedure DeclareImportName(ain: tai_import_name);
procedure DeclareLocal(al: tai_local);
procedure DeclareLocals(al: tai_local);
procedure symbolpairdefine(akind: TSymbolPairKind;const asym, avalue: string);override;
property FuncTypes: TWasmFuncTypeTable read FFuncTypes;
end;
@ -1203,7 +1203,7 @@ implementation
ObjSymExtraData.ImportName:=ain.importname;
end;
procedure TWasmObjData.DeclareLocal(al: tai_local);
procedure TWasmObjData.DeclareLocals(al: tai_local);
var
ObjSymExtraData: TWasmObjSymbolExtraData;
t: TWasmBasicType;