[slime-cvs] CVS slime
heller
heller at common-lisp.net
Sat Aug 30 15:33:20 UTC 2008
Update of /project/slime/cvsroot/slime
In directory clnet:/tmp/cvs-serv4281
Modified Files:
ChangeLog swank-abcl.lisp
Log Message:
* swank-abcl.lisp (make-output-stream, make-input-stream):
provides the (trivial) definitions for MAKE-OUTPUT-STREAM and
MAKE-INPUT-STREAM for ABCL.
--- /project/slime/cvsroot/slime/ChangeLog 2008/08/27 18:03:45 1.1480
+++ /project/slime/cvsroot/slime/ChangeLog 2008/08/30 15:33:20 1.1481
@@ -1,3 +1,9 @@
+2008-08-30 Mark Evenson <evenson at panix.com>
+
+ * swank-abcl.lisp (make-output-stream, make-input-stream):
+ provides the (trivial) definitions for MAKE-OUTPUT-STREAM and
+ MAKE-INPUT-STREAM for ABCL.
+
2008-08-27 Helmut Eller <heller at common-lisp.net>
* slime.el (sldb-setup): Insert "No backtrace" if the backtrace is
--- /project/slime/cvsroot/slime/swank-abcl.lisp 2008/08/11 17:41:47 1.51
+++ /project/slime/cvsroot/slime/swank-abcl.lisp 2008/08/30 15:33:20 1.52
@@ -24,6 +24,12 @@
:format-arguments format-arguments))))
nil))
+(defimplementation make-output-stream (write-string)
+ (ext:make-slime-output-stream write-string))
+
+(defimplementation make-input-stream (read-string)
+ (ext:make-slime-input-stream read-string))
+
(defimplementation make-fn-streams (input-fn output-fn)
(let* ((output (ext:make-slime-output-stream output-fn))
(input (ext:make-slime-input-stream input-fn output)))
More information about the slime-cvs
mailing list