r10388: more sbcl fix

[kmrcl.git] / byte-stream.lisp

diff --git a/byte-stream.lisp b/byte-stream.lisp
index 79ce9df449d930637e5a0464a6ca273afc688850..712904d31f77a277f14ba7ff4b5a40d11b222ce9 100644 (file)
--- a/byte-stream.lisp
+++ b/byte-stream.lisp
@@ -27,7 +27,7 @@
 (progn
 (defstruct (byte-array-output-stream
              (:include #+cmu system:lisp-stream
-                      #+sbcl sb-impl::fd-stream
+                      #+sbcl sb-sys:fd-stream
                        (bout #'byte-array-bout)
                        (misc #'byte-array-out-misc))
              (:print-function %print-byte-array-output-stream)