Permalink
Browse files

* swank-ecl.lisp (compile-from-stream): Fixed typo that prevented

  `slime-compile-defun' from actually compiling a function.
  • Loading branch information...
1 parent 3c8ad40 commit d2ab4d0c5e6178565451e9734cee9aa43d6c85b5 @trittweiler trittweiler committed May 17, 2007
Showing with 6 additions and 1 deletion.
  1. +5 −0 ChangeLog
  2. +1 −1 swank-ecl.lisp
View
@@ -1,3 +1,8 @@
+2007-05-17 Dustin Long <dlong@stevens.edu>
+
+ * swank-ecl.lisp (compile-from-stream): Fixed typo that prevented
+ `slime-compile-defun' from actually compiling a function.
+
2007-05-17 Tobias C. Rittweiler <tcr@freebits.de>
* swank-loader.lisp (*sysdep-files*): Load the auxiliary files
View
@@ -142,7 +142,7 @@
(let ((file (si::mkstemp "TMP:ECLXXXXXX")))
(with-open-file (s file :direction :output :if-exists :overwrite)
(do ((line (read-line stream nil) (read-line stream nil)))
- (line)
+ ((not line))
(write-line line s)))
(unwind-protect
(apply #'compile-file file args)

0 comments on commit d2ab4d0

Please sign in to comment.