From f7b7c39129d72330dcb4b37010f1f5b7f729f43e Mon Sep 17 00:00:00 2001
From: Nikolay Nikolov <nickysn@gmail.com>
Date: Wed, 16 Feb 2022 02:31:23 +0200
Subject: [PATCH] * use 'with' in tlinkerwasi.SetDefaultInfo

---
 compiler/systems/t_wasi.pas | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/compiler/systems/t_wasi.pas b/compiler/systems/t_wasi.pas
index c2a7b3544d..144981e5cf 100644
--- a/compiler/systems/t_wasi.pas
+++ b/compiler/systems/t_wasi.pas
@@ -94,7 +94,10 @@ end;
 
 procedure tlinkerwasi.SetDefaultInfo;
 begin
-  Info.DllCmd[1] := 'wasm-ld $SONAME $GCSECTIONS $MAP -o $EXE';
+  with Info do
+    begin
+      DllCmd[1] := 'wasm-ld $SONAME $GCSECTIONS $MAP -o $EXE';
+    end;
 end;
 
 procedure tlinkerwasi.InitSysInitUnitName;