(eval-when (:execute :load-toplevel :compile-toplevel)
(defpackage :empire
(:use :cl)
- (:export :read-message-loop
- :read-message
+ (:export :session
:make-connection
:connect
:send-message))
(defpackage :empire-web
(:use :cl :hunchentoot)
(:export :start :send :prompt :data)))
-