WebSocket Server を Scheme で書いてみた

WebSocket Server を RFC 6455 を読みながら Scheme で書いてみました。
といっても、単純なエコーサーバなので、入力したものが返ってくるだけです。IO多重化もしていません。
処理系は Gauche 0.9.2 です。RFC 6455 に準拠しているブラウザで動きます。
（Chrome 16でしか確認していません）

https://gist.github.com/1640609

未対応の部分や反省点はいろいろありますが、とりあえず。

Appendix
http://tools.ietf.org/html/rfc6455
https://github.com/MostAwesomeDude/txWS