From 9992988f581532a7db50b57594fc3e346398f9fa Mon Sep 17 00:00:00 2001 From: Brian Cully Date: Tue, 15 Mar 2011 22:03:11 -0400 Subject: Update for 10.7 Also set stream type to latin-1 in SBCL. This should become a setting. --- Lisp/moxie/compat/compat-sbcl.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Lisp/moxie/compat') diff --git a/Lisp/moxie/compat/compat-sbcl.lisp b/Lisp/moxie/compat/compat-sbcl.lisp index bb43bc8..aff4581 100644 --- a/Lisp/moxie/compat/compat-sbcl.lisp +++ b/Lisp/moxie/compat/compat-sbcl.lisp @@ -21,7 +21,7 @@ :protocol :tcp))) (sb-bsd-sockets:socket-connect socket (coerce-inet-address-designator host) port) (let ((stream (sb-bsd-sockets:socket-make-stream socket - :input t :output t :buffering buffering))) + :input t :output t :buffering buffering :external-format :latin-1))) (setf (gethash stream *stream-to-socket*) socket) stream))) @@ -46,4 +46,4 @@ (sb-sys:remove-fd-handler it))) (defun save-lisp-and-die (path) - (sb-ext:save-lisp-and-die path)) \ No newline at end of file + (sb-ext:save-lisp-and-die path)) -- cgit v1.2.3