From: Nikodemus S. <de...@us...> - 2010-10-07 14:10:49
|
Update of /cvsroot/sbcl/sbcl/tests In directory sfp-cvsdas-3.v30.ch3.sourceforge.com:/tmp/cvs-serv21011/tests Modified Files: stream.impure.lisp Log Message: 1.0.43.29: fix OVERAGER-CHARACTER-BUFFERING test-case * It should be OVEREAGER-CHARACTER-BUFFERING. * mktemp doesn't allow a suffix after the Xs. Most incidiously, on Linux it did not even signal an error, but returned "BCL-fifo-XXXXXXX", causing mkfifo to fail. Index: stream.impure.lisp =================================================================== RCS file: /cvsroot/sbcl/sbcl/tests/stream.impure.lisp,v retrieving revision 1.36 retrieving revision 1.37 diff -u -d -r1.36 -r1.37 --- stream.impure.lisp 30 Sep 2010 08:23:34 -0000 1.36 +++ stream.impure.lisp 7 Oct 2010 14:10:40 -0000 1.37 @@ -642,7 +642,7 @@ #-win32 (require :sb-posix) #-win32 -(with-test (:name :overager-character-buffering) +(with-test (:name :overeager-character-buffering) (let ((fifo nil) (proc nil)) (maphash @@ -652,7 +652,7 @@ (finish-output t) (unwind-protect (progn - (setf fifo (sb-posix:mktemp "SBCL-fifo-XXXXXXX.tmp")) + (setf fifo (sb-posix:mktemp "SBCL-fifo-XXXXXXX")) (sb-posix:mkfifo fifo (logior sb-posix:s-iwusr sb-posix:s-irusr)) ;; KLUDGE: because we have both ends in the same process, we would ;; need to use O_NONBLOCK, but this works too. |