io.servers.connection: accept-loop doesn't need to be 'inline recursive'
parent
637a77c018
commit
c4f19bc117
|
@ -96,7 +96,7 @@ M: threaded-server handle-client* handler>> call( -- ) ;
|
||||||
[ [ accept-connection ] with-semaphore ]
|
[ [ accept-connection ] with-semaphore ]
|
||||||
[ accept-connection ]
|
[ accept-connection ]
|
||||||
if*
|
if*
|
||||||
] [ accept-loop ] bi ; inline recursive
|
] [ accept-loop ] bi ;
|
||||||
|
|
||||||
: started-accept-loop ( threaded-server -- )
|
: started-accept-loop ( threaded-server -- )
|
||||||
threaded-server get
|
threaded-server get
|
||||||
|
|
Loading…
Reference in New Issue