0.8.2.34:

[sbcl.git] / contrib / sb-simple-streams / simple-streams.lisp

diff --git a/contrib/sb-simple-streams/simple-streams.lisp b/contrib/sb-simple-streams/simple-streams.lisp
index 31db6dd..4caf28a 100644 (file)
--- a/contrib/sb-simple-streams/simple-streams.lisp
+++ b/contrib/sb-simple-streams/simple-streams.lisp
@@ -278,7 +278,7 @@
         ;; Handle encapsulated stream.  FIXME: perhaps handle
         ;; sbcl-vintage ansi-stream type in write-octets too?
         (stream (write-octets fd buffer start end blocking))
-       (t (error "Don't know how to handle output handle &A" fd))))))
+       (t (error "Don't know how to handle output handle ~A" fd))))))
 
 
 ;;;