X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fstream.lisp;h=5788195db976a4df62c94283b44e82ac2d129a7c;hb=86210c4e406c1b2ff10cc3bac0e71435867db48b;hp=e93c89cf537afaa44453588f71968e8e7d8b584a;hpb=c713eb2b521b048ff2c927ec52b861787d289f85;p=sbcl.git

diff --git a/src/code/stream.lisp b/src/code/stream.lisp
index e93c89c..5788195 100644
--- a/src/code/stream.lisp
+++ b/src/code/stream.lisp
@@ -1359,7 +1359,7 @@
 
 (defstruct (case-frob-stream
 	    (:include ansi-stream
-		      (:misc #'case-frob-misc))
+		      (misc #'case-frob-misc))
 	    (:constructor %make-case-frob-stream (target out sout))
 	    (:copier nil))
   (target (missing-arg) :type stream))