diff --git a/tests/all.T b/tests/all.T
index 0086949d26cbe1cbb31b8a780ce7fc9de9415b77..273d1853fe2fb224987d8741e1b07ac4fb83dd0b 100644
--- a/tests/all.T
+++ b/tests/all.T
@@ -59,3 +59,4 @@ test('3816', normal, compile_and_run, ['-package unix'])
 
 test('processGroup001', normal, compile_and_run, ['-package unix'])
 test('processGroup002', normal, compile_and_run, ['-package unix'])
+test('executeFile001', normal, compile_and_run, ['-package unix'])
diff --git a/tests/executeFile001.hs b/tests/executeFile001.hs
new file mode 100644
index 0000000000000000000000000000000000000000..7a70695b07cc56aeb57ffe90e7944424960b3c70
--- /dev/null
+++ b/tests/executeFile001.hs
@@ -0,0 +1,6 @@
+
+import System.Posix.Process
+
+main :: IO ()
+main = executeFile "echo" True ["arg1", "ar   g2"] Nothing
+
diff --git a/tests/executeFile001.stdout b/tests/executeFile001.stdout
new file mode 100644
index 0000000000000000000000000000000000000000..9f4111c2dd30303958b07eb19fa3f31ba8f0aeda
--- /dev/null
+++ b/tests/executeFile001.stdout
@@ -0,0 +1 @@
+arg1 ar   g2