(: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 :prompt :data)))
+