Skip to content

Commit

Permalink
Fix.
Browse files Browse the repository at this point in the history
  • Loading branch information
fukamachi committed Aug 10, 2024
1 parent 752b6df commit 74ef1df
Showing 1 changed file with 1 addition and 2 deletions.
3 changes: 1 addition & 2 deletions src/ev/tcp.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -241,8 +241,7 @@
(multiple-value-bind (remote-addr remote-port)
(get-remote-addr-and-port)
(let ((socket (make-socket :fd client-fd :tcp-read-cb 'tcp-read-cb
:remote-addr remote-addr :remote-port remote-port
:ssl-stream (make-ssl-stream client-fd))))
:remote-addr remote-addr :remote-port remote-port)))
(let* ((callbacks (callbacks fd))
(read-cb (getf callbacks :read-cb))
(connect-cb (getf callbacks :connect-cb)))
Expand Down

0 comments on commit 74ef1df

Please # to comment.