#! /usr/bin/toka
#! ---------------------------------------------------------------
#! Partially RFC862 Compliant Echo Server
#!
#! Copyright (c)2007 by Charles Childers
#!
#! Permission to use, copy, modify, and distribute this 
#! software for any purpose with or without fee is hereby 
#! granted, provided that the above copyright notice and 
#! this permission notice appear in all copies.
#!
#! THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR 
#! DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE 
#! INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY 
#! AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE 
#! FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL 
#! DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS 
#! OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF 
#! CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING 
#! OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE 
#! OF THIS SOFTWARE.
#! ---------------------------------------------------------------

needs sockets
include server

8192 chars is-array buffer
[ buffer 8192 server.recieve buffer server.send ] 7 server.start
