echo-server: switch to utf8.

db4
John Benediktsson 2012-08-06 15:22:18 -07:00
parent f60513c053
commit 4d62b3218f
1 changed files with 2 additions and 2 deletions

View File

@ -1,7 +1,7 @@
! Copyright (C) 2012 John Benediktsson
! See http://factorcode.org/license.txt for BSD license.
USING: accessors kernel io io.encodings.ascii io.servers ;
USING: accessors kernel io io.encodings.utf8 io.servers ;
IN: echo-server
@ -9,7 +9,7 @@ IN: echo-server
readln [ write "\r\n" write flush echo-loop ] when* ;
: <echo-server> ( port -- server )
ascii <threaded-server>
utf8 <threaded-server>
swap >>insecure
"echo.server" >>name
[ echo-loop ] >>handler ;