From 833e3d98cf09bb2aa584e93d08b9c727581875f4 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Thu, 9 Jul 2020 07:42:30 +0200
Subject: [PATCH] more process parameters passed as array literal

---
 src/u_diff.pas | 4 +---
 src/u_main.pas | 8 ++------
 2 files changed, 3 insertions(+), 9 deletions(-)

diff --git a/src/u_diff.pas b/src/u_diff.pas
index d0afebf8..1a36c4f7 100644
--- a/src/u_diff.pas
+++ b/src/u_diff.pas
@@ -53,9 +53,7 @@ begin
 
     if exeInSysPath(p.Executable) then
     begin
-      p.Parameters.Add('-u');
-      p.Parameters.Add(fname1);
-      p.Parameters.Add(fname2);
+      p.Parameters.AddStrings(['-u', fname1, fname2]);
       p.Options:= [poUsePipes];
       p.ShowWindow:= swoHIDE;
       p.Execute;
diff --git a/src/u_main.pas b/src/u_main.pas
index afaf110b..d457e85c 100644
--- a/src/u_main.pas
+++ b/src/u_main.pas
@@ -3144,14 +3144,10 @@ begin
       if fCovModUt then
         dmdproc.Parameters.Add('-cov');
       // NOTE: see #258, allows to test easily a module when hacking phobos.
-      dmdproc.Parameters.Add('-version=StdUnittest');
-      dmdproc.Parameters.Add('-version=test_single_module');
+      dmdproc.Parameters.AddStrings(['-version=StdUnittest', '-version=test_single_module']);
     end
     else
-    begin
-      dmdproc.Parameters.Add('-version=runnable_module');
-      dmdproc.Parameters.Add('-version=run_single_module');
-    end;
+      dmdproc.Parameters.AddStrings(['-version=runnable_module', '-version=run_single_module']);
 
     if fRunnablesOptions.detectLibraries then
       LibMan.getLibsForSource(fDoc.Lines, dmdproc.Parameters, dmdproc.Parameters)