(:use :cl)
(:export :read-message-loop
:read-message
- :make-connection))
+ :make-connection
+ :connect
+ :send-message))
(defpackage :locked-queue
(:use :cl :sb-thread)
(:export :create :enqueue :dequeue))
(defpackage :empire-web
(:use :cl :hunchentoot)
- (:export :start :send)))
+ (:export :start :send :prompt :data)))