From 790a58be52aa745633f5c23464a774d774200fa6 Mon Sep 17 00:00:00 2001
From: Nikolay Nikolov <nickysn@gmail.com>
Date: Sun, 24 Dec 2023 12:18:15 +0200
Subject: [PATCH] + added ld_int_wasi constant. Register the WASI internal
 linker.

---
 compiler/systems.inc        | 1 +
 compiler/systems/t_wasi.pas | 1 +
 2 files changed, 2 insertions(+)

diff --git a/compiler/systems.inc b/compiler/systems.inc
index 9734703a25..b9ec102828 100644
--- a/compiler/systems.inc
+++ b/compiler/systems.inc
@@ -327,6 +327,7 @@
              ld_int_win16,
              ld_int_zxspectrum,
              ld_int_msxdos,
+             ld_int_wasi,
              ld_freertos,
              ld_zxspectrum,
              ld_msxdos,
diff --git a/compiler/systems/t_wasi.pas b/compiler/systems/t_wasi.pas
index 2ef64df37c..83d62666a6 100644
--- a/compiler/systems/t_wasi.pas
+++ b/compiler/systems/t_wasi.pas
@@ -298,6 +298,7 @@ initialization
   RegisterTarget(system_wasm32_wasi_info);
   RegisterImport(system_wasm32_wasi, timportlibwasi);
   RegisterExport(system_wasm32_wasi, texportlibwasi);
+  RegisterLinker(ld_int_wasi,TInternalLinkerWasi);
   RegisterLinker(ld_wasi, tlinkerwasi);
 
 end.