]> git.pond.sub.org Git - eow/blob - package.lisp
Add thread safe queue. Use to push updates to client.
[eow] / package.lisp
1 ;;;; $Id$
2
3 ;;;; See the LICENSE file for licensing information.
4
5 (in-package :cl-user)
6
7 ;; the exports list needs some cleanup/clarification/categorization
8 (eval-when (:execute :load-toplevel :compile-toplevel)
9   (defpackage :empire
10       (:use :cl)
11     (:export :read-message-loop
12              :read-message
13              :make-connection))
14   (defpackage :locked-queue
15     (:use :cl :sb-thread)
16     (:export :create :enqueue :dequeue))
17   (defpackage :empire-web
18     (:use :cl :hunchentoot)
19     (:export :start)))
20