X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fansi-stream.lisp;h=dc728e0706211cb9d173dc00dee39b806014eee4;hb=15d6e7c9a2c3234f95dfe278046fa2fee1b0c007;hp=819cd89cb95640b625a26de9eb471aab72778a12;hpb=8eb6f7d3da3960c827b704e23b5a47008274be7d;p=sbcl.git

diff --git a/src/code/ansi-stream.lisp b/src/code/ansi-stream.lisp
index 819cd89..dc728e0 100644
--- a/src/code/ansi-stream.lisp
+++ b/src/code/ansi-stream.lisp
@@ -113,7 +113,7 @@
   (sout #'ill-out :type function)		; string output function
 
   ;; other, less-used methods
-  (misc #'do-nothing :type function))
+  (misc #'no-op-placeholder :type function))
 
 (def!method print-object ((x ansi-stream) stream)
   (print-unreadable-object (x stream :type t :identity t)))