diff --git a/test/test-run-program.script b/test/test-run-program.script
index 55c76895b3b7742512c35318363b640ff38bc218..6ec9935f7ef3d2fe63ed39abc8de504a31173920 100644
--- a/test/test-run-program.script
+++ b/test/test-run-program.script
@@ -37,6 +37,7 @@
     (run-program "cat ; echo bar  baz >&2 ; exit 42"
                  :input '("foo") :output :string :error-output '(:string :stripped t)
                  :ignore-error-status t)))
+  #-abcl
   (assert-equal
    '(("foo" "bar" "baz" "quux") nil 0)
    (multiple-value-list