Changeset 15368

Timestamp:

08/13/20 19:24:26 (3 years ago)

Author:

Mark Evenson

Message:

Less cryptic warnings for ignored socket write timeout

File:

• trunk/abcl/src/org/armedbear/lisp/socket.lisp (modified) (1 diff)

trunk/abcl/src/org/armedbear/lisp/socket.lisp

@@ -105 +105 @@
   "No-op setting of write timeout to SECONDS on SOCKET."
   (declare (ignore socket seconds))
-  (warn "Unimplemented.
-
-Timeouts for writes should be implemented by spawning a guardian
-to the thread perfoming the socket write"))
-
+  ;;  TODO timeouts for writes could possibly be implemented by
+  ;;  spawning a guardian to asynchronously check on the threads
+  ;;  perfoming the socket write.
+  (warn "Ignoring request for unimplemented socket write timeout."))
+  
 (provide '#:socket)