diff --git a/test/test-run-program.script b/test/test-run-program.script
index 31e1b728403977412b1e30f46b9e95eec04d49af..2bc7e103f9981afe75aa2d45c06d22ff1d592d4a 100644
--- a/test/test-run-program.script
+++ b/test/test-run-program.script
@@ -20,6 +20,7 @@
      (let ((*verbose-out* s))
        (run-shell-command "echo ~A 1" "ok")))
    ok1)
+  #-ecl
   (assert-equal
    (with-output-to-string (s)
      (let ((*verbose-out* t)