io.servers.packet: nothing was using it and it had a stack effect error. nuked

db4
Slava Pestov 2009-11-09 00:53:47 -06:00
parent 473cc7db4a
commit 2557ce1010
4 changed files with 0 additions and 26 deletions

View File

@ -1 +0,0 @@
Slava Pestov

View File

@ -1,23 +0,0 @@
USING: concurrency.combinators destructors fry
io.sockets kernel logging ;
IN: io.servers.packet
<PRIVATE
LOG: received-datagram NOTICE
: datagram-loop ( quot datagram -- )
[
[ receive dup received-datagram [ swap call ] dip ] keep
pick [ send ] [ 3drop ] if
] 2keep datagram-loop ; inline
: spawn-datagrams ( quot addrspec -- )
<datagram> [ datagram-loop ] with-disposal ; inline
\ spawn-datagrams NOTICE add-input-logging
PRIVATE>
: with-datagrams ( seq service quot -- )
'[ [ [ _ ] dip spawn-datagrams ] parallel-each ] with-logging ; inline

View File

@ -1 +0,0 @@
Multi-threaded UDP/IP servers

View File

@ -1 +0,0 @@
network