Permalink
Browse files

* swank-backend.lisp (call-with-io-timeout): Not used. Deleted.

* swank-sbcl.lisp (call-with-io-timeout): Deleted.
  • Loading branch information...
1 parent 30337ca commit 01ded1915a25bb6fc3b05709c14aa258bc5f3268 Helmut Eller committed May 11, 2012
Showing with 5 additions and 13 deletions.
  1. +5 −0 ChangeLog
  2. +0 −6 swank-backend.lisp
  3. +0 −7 swank-sbcl.lisp
View
@@ -1,3 +1,8 @@
+2012-05-11 Helmut Eller <heller@common-lisp.net>
+
+ * swank-backend.lisp (call-with-io-timeout): Not used. Deleted.
+ * swank-sbcl.lisp (call-with-io-timeout): Deleted.
+
2012-05-07 Helmut Eller <heller@common-lisp.net>
Ignore linebreaks for the macroexpand test.
View
@@ -1425,12 +1425,6 @@ but that thread may hold it more than once."
(type function function))
(funcall function))
-;; Same here: don't use this outside of swank-gray.lisp.
-(definterface call-with-io-timeout (function &key seconds)
- "Calls function with the specified IO timeout."
- (declare (ignore seconds))
- (funcall function))
-
;;;; Weak datastructures
View
@@ -1838,13 +1838,6 @@ stack."
:dual-channel-p t
:external-format external-format))
-(defimplementation call-with-io-timeout (function &key seconds)
- (handler-case
- (sb-sys:with-deadline (:seconds seconds)
- (funcall function))
- (sb-sys:deadline-timeout ()
- nil)))
-
#-win32
(defimplementation background-save-image (filename &key restart-function
completion-function)

0 comments on commit 01ded19

Please sign in to comment.