diff --git a/src/tests/normal-tests/executable-cli.lsp b/src/tests/normal-tests/executable-cli.lsp
index 7fa0999e5..2c29d3fc1 100644
--- a/src/tests/normal-tests/executable-cli.lsp
+++ b/src/tests/normal-tests/executable-cli.lsp
@@ -13,9 +13,6 @@
   (or (ext:getenv "TEST_IMAGE")
       "/data/Warsztat/Repozytoria/ecl/otp/bin/ecl"))
 
-;;; Bug #43: Infinite loop when writing to stderr fails
-;;; Reported by: Dmitri Pasechnik
-;;; Date: 2015-05-06
 (defun simple-run (input-string &optional output error)
   (when (null *test-image*)
     (return-from simple-run))
@@ -28,6 +25,10 @@
                      :if-output-exists :append
                      :if-error-exists :append)))
 
+
+;;; Bug #43: Infinite loop when writing to stderr fails
+;;; Reported by: Dmitri Pasechnik
+;;; Date: 2015-05-06
 #+unix ; Windows doesn't have /dev/...
 (test executable.1.infinite-loop
   (is-eql 0 (nth-value 1 (simple-run "Invalid syntax"