;;; on 2008-10-16 for more info.
(with-test (:name (:character-coding-error-stream-external-format))
(flet ((first-file-character ()
- (with-open-file (stream *test-file* :external-format :utf-8)
+ (with-open-file (stream *test-path* :external-format :utf-8)
(read-char stream))))
- (with-open-file (stream *test-file*
+ (with-open-file (stream *test-path*
:direction :output
:if-exists :supersede
:element-type '(unsigned-byte 8))
;;; checkins which aren't released. (And occasionally for internal
;;; versions, especially for internal versions off the main CVS
;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"1.0.21.22"
+"1.0.21.23"