diff --git a/compiler/ogwasm.pas b/compiler/ogwasm.pas index 32b4df4434..7eb54e3c8d 100644 --- a/compiler/ogwasm.pas +++ b/compiler/ogwasm.pas @@ -4956,6 +4956,13 @@ implementation objsec.Data.seek(objreloc.DataOffset); WriteUleb5(objsec.Data,UInt32(objsym.offset+objsym.objsection.MemPos)); end; + RELOC_TAG_INDEX_LEB: + begin + if objsym.typ<>AT_WASM_EXCEPTION_TAG then + internalerror(2024010708); + objsec.Data.seek(objreloc.DataOffset); + WriteUleb5(objsec.Data,UInt32(objsym.offset+objsym.objsection.MemPos)); + end; else Writeln('Symbol relocation not yet implemented! ', objreloc.typ); end;