X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fstream.lisp;h=086b145d81a69e245dc8d7bf4d9ebf24e12366c9;hb=18ada11fb234e336a3d2ac4370d384d80d36f9f0;hp=b563338d5ebe7e5fc20869e055593d50236d6a61;hpb=dc8d38273bc1d2276e20ca1f18114a78ca4b5639;p=jscl.git

diff --git a/src/stream.lisp b/src/stream.lisp
index b563338..086b145 100644
--- a/src/stream.lisp
+++ b/src/stream.lisp
@@ -19,6 +19,8 @@
 ;;; TODO: Use structures to represent streams, but we would need
 ;;; inheritance.
 
+(/debug "loading stream.lisp!")
+
 (defvar *standard-output*
   (vector 'stream
           (lambda (ch) (%write-string (string ch)))