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

+ write export section in the wasm internal linker exe writer, only the memory is exported for now

Browse Source
This commit is contained in:
Nikolay Nikolov 2024-01-01 21:20:37 +02:00
parent d03963afe9
commit c4a77a832f
1 changed files with 13 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
compiler/ogwasm.pas
View File

@ -4431,6 +4431,17 @@ implementation
end;
end;
procedure WriteExportSection;
const
ExportsCount=1;
begin
WriteUleb(FWasmSections[wsiExport],ExportsCount);
{ export 0 }
WriteName(FWasmSections[wsiExport],'memory');
WriteByte(FWasmSections[wsiExport],$02); { mem }
WriteUleb(FWasmSections[wsiExport],0); { memidx = 0 }
end;
begin
result:=false;
@ -4440,6 +4451,7 @@ implementation
WriteDataSegments;
WriteTableAndElemSections;
WriteGlobalSection;
WriteExportSection;
WriteUleb(FWasmSections[wsiMemory],1);
WriteByte(FWasmSections[wsiMemory],0);
@ -4455,6 +4467,7 @@ implementation
WriteWasmSection(wsiTable);
WriteWasmSection(wsiMemory);
WriteWasmSection(wsiGlobal);
WriteWasmSection(wsiExport);
WriteWasmSection(wsiElement);
WriteWasmSection(wsiDataCount);
WriteWasmSection(wsiCode);