]> git.pond.sub.org Git - eow/blob - package.lisp
Extract get-table from get-table-entry. Maintain fill pointer at last entry.
[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 :session
12              :make-connection
13              :connect
14              :command))
15   (defpackage :locked-queue
16     (:use :cl :sb-thread)
17     (:export :create :enqueue :dequeue :dequeue-all))
18   (defpackage :empire-web
19     (:use :cl)
20     (:export :start :send :prompt :data))
21   (defpackage :empire-log
22     (:use :cl)
23     (:export :info))
24   (defpackage :xdump-data
25     (:use :cl))
26   (defpackage :xdump
27     (:use :cl :xdump-data)
28     (:export :make-parser :parse-line)))