blob: 361963c9c49e8dac1fbc4919e0d6aa338b127193 (
about) (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
;;; cl-setup.lisp -- set up mumble environment in Common Lisp
;;;
;;; author : Sandra Loosemore
;;; date : 10 Oct 1991
;;;
;;; This file must be loaded before either compiling or loading
;;; the cl-definitions file.
;;; The mumble package exports only those symbols that have definitions
;;; in mumble. Many of these symbols shadow built-in CL definitions.
;;; Programs that use mumble should use the mumble package in place of
;;; (rather than in addition to) the CL package.
(unless (find-package "MUMBLE")
(make-package "MUMBLE" :use nil))
;;; The actual implementation of the mumble compatibility library happens
;;; in the MUMBLE-IMPLEMENTATION package. We'll explicitly package-qualify
;;; all symbols from the MUMBLE package that it references, and rely
;;; on the definitional macros to arrange to export them from the MUMBLE
;;; package.
(unless (find-package "MUMBLE-IMPLEMENTATION")
(make-package "MUMBLE-IMPLEMENTATION" :use '("LISP")))
|