mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-23 04:52:42 -08:00
Code Issues Projects Releases Packages Wiki Activity

typo: misplaced comment

Browse source
This commit is contained in:
Daniel Kochmański 2016-11-19 16:19:38 +01:00
parent b011eff24a
commit 2c3ccd8444
1 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/tests/normal-tests/executable-cli.lsp
View file

@ -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"