From 14d9dded26552168a96a37b34d80506bd002c2c3 Mon Sep 17 00:00:00 2001 From: wlott <wlott> Date: Thu, 30 Jan 1992 07:24:10 +0000 Subject: [PATCH] Export things like *describe-print-level* from EXT, not LISP. --- code/describe.lisp | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/code/describe.lisp b/code/describe.lisp index 3da07fd29..bd25da8a9 100644 --- a/code/describe.lisp +++ b/code/describe.lisp @@ -7,7 +7,7 @@ ;;; Scott Fahlman or slisp-group@cs.cmu.edu. ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/describe.lisp,v 1.16 1991/12/20 19:09:54 ram Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/describe.lisp,v 1.17 1992/01/30 07:24:10 wlott Exp $") ;;; ;;; ********************************************************************** ;;; @@ -23,9 +23,13 @@ ;;; (in-package "LISP") +(export '(describe)) -(export '(describe *describe-level* *describe-verbose* *describe-print-level* - *describe-print-length* *describe-indentation*)) +(in-package "EXT") +(export '(*describe-level* *describe-verbose* *describe-print-level* + *describe-print-length* *describe-indentation*)) + +(in-package "LISP") ;;;; DESCRIBE public switches. -- GitLab