1.0.23.30: Don't export storage class names.

diff --git a/src/compiler/mips/vm.lisp b/src/compiler/mips/vm.lisp
index 65e0515..25f2018 100644 (file)
--- a/src/compiler/mips/vm.lisp
+++ b/src/compiler/mips/vm.lisp
@@ -108,7 +108,6 @@
                 (list* `(define-storage-class ,sc-name ,index
                           ,@(cdr class))
                        `(def!constant ,constant-name ,index)
-                       `(export ',constant-name)
                        forms)))
        (index 0 (1+ index))
        (classes classes (cdr classes)))

diff --git a/version.lisp-expr b/version.lisp-expr
index b96a60d..af56b78 100644 (file)
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"1.0.23.29"
+"1.0.23.30"