Unverified Commit 95ed9886 authored by Bruno Cichon's avatar Bruno Cichon
Browse files

Mezzano: Use element-type in socket-accept and allow host-or-ip in handle-condition

parent cd9c5f5f
......@@ -4,7 +4,7 @@
(in-package :usocket)
(defun handle-condition (condition &optional (socket nil))
(defun handle-condition (condition &optional (socket nil) (host-or-ip nil))
(typecase condition
;; TODO: Add additional conditions as appropriate
(mezzano.network.tcp:connection-timed-out
......@@ -71,9 +71,8 @@
(mezzano.network.tcp:close-tcp-listener (socket usocket))))
(defmethod socket-accept ((usocket stream-server-usocket) &key element-type)
(declare (ignore element-type))
(with-mapped-conditions (usocket)
(let ((s (mezzano.network.tcp:tcp-accept (socket usocket))))
(let ((s (mezzano.network.tcp:tcp-accept (socket usocket) :element-type element-type)))
(make-stream-socket :socket s
:stream s))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment