suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix commit 0a95c50f, missed one call to wrap-ports

Browse Source
This commit is contained in:
Ryan Culpepper 2021-04-08 19:35:03 +02:00
parent 0a95c50f77
commit 1c4570b315
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racket/collects/openssl/mzssl.rkt
View File

@ -1831,7 +1831,7 @@ TO DO:
(close-input-port i)
(close-output-port o)
(raise exn))])
(wrap-ports who i o (ssl-listener-mzctx ssl-listener) 'accept #t #f error/network #f))))
(wrap-ports who i o (ssl-listener-mzctx ssl-listener) 'accept #t #f error/network #f null))))
(define (ssl-accept ssl-listener)
(do-ssl-accept 'ssl-accept tcp-accept ssl-listener))