diff --git a/basis/io/servers/connection/connection.factor b/basis/io/servers/connection/connection.factor index 345b739b61..fdd42352da 100644 --- a/basis/io/servers/connection/connection.factor +++ b/basis/io/servers/connection/connection.factor @@ -96,7 +96,7 @@ M: threaded-server handle-client* handler>> call( -- ) ; [ [ accept-connection ] with-semaphore ] [ accept-connection ] if* - ] [ accept-loop ] bi ; inline recursive + ] [ accept-loop ] bi ; : started-accept-loop ( threaded-server -- ) threaded-server get