factor/extra/tty-server/tty-server.factor

USING: listener io.servers io.encodings.utf8 accessors kernel ;
IN: tty-server

: <tty-server> ( port -- )
    utf8 <threaded-server>
        "tty-server" >>name
        swap local-server >>insecure
        [ listener ] >>handler
    start-server drop ;

: tty-server ( -- ) 9999 <tty-server> ;

MAIN: tty-server
Squashed commit of the following: commit 54b3e19c7407707fabddd53872559c58cd5143d2 Author: Doug Coleman <doug.coleman@gmail.com> Date: Mon Sep 27 19:10:15 2010 -0500 Fix typo commit 3207516dc93e0e1edc9f119efcc79f4484eab244 Author: Doug Coleman <doug.coleman@gmail.com> Date: Mon Sep 27 19:08:30 2010 -0500 Rename io.servers.connection to io.servers 2010-09-27 20:12:33 -04:00			`USING: listener io.servers io.encodings.utf8 accessors kernel ;`
Initial import 2007-09-20 18:09:08 -04:00			`IN: tty-server`

Updating code for new io.servers code 2008-06-17 01:08:50 -04:00			`: <tty-server> ( port -- )`
change threaded-server and managed-server to take an encoding 2009-05-30 20:15:53 -04:00			`utf8 <threaded-server>`
Updating code for new io.servers code 2008-06-17 01:08:50 -04:00			`"tty-server" >>name`
			`swap local-server >>insecure`
Fix build errors 2008-06-17 06:21:45 -04:00			`[ listener ] >>handler`
Squashed commit of the following: commit 8a15381d30508b8f36a9e36dc3a0afc3c962c853 Author: Doug Coleman <doug.coleman@gmail.com> Date: Sat Sep 11 14:32:30 2010 -0500 Squash threaded-server branch 2010-09-19 14:38:02 -04:00			`start-server drop ;`
Initial import 2007-09-20 18:09:08 -04:00
Fix build errors 2008-06-17 06:21:45 -04:00			`: tty-server ( -- ) 9999 <tty-server> ;`
Initial import 2007-09-20 18:09:08 -04:00
Updating code for new io.servers code 2008-06-17 01:08:50 -04:00			`MAIN: tty-server`