diff --git a/code/exports.lisp b/code/exports.lisp index cffba253365d3d21882d542d3decd8e09f5da3b1..e4c87d6c5a47da25b772a9f6b31a814f23aa3ff7 100644 --- a/code/exports.lisp +++ b/code/exports.lisp @@ -7,7 +7,7 @@ ;;; Scott Fahlman (FAHLMAN@CMUC). ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.36 1990/07/02 04:44:08 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.37 1990/07/02 16:44:57 ram Exp $ ;;; ;;; All the stuff necessary to export various symbols from various packages. ;;; @@ -263,6 +263,7 @@ (use-package "EXT") (use-package "SYSTEM") (use-package "BIGNUM") +(use-package "VM") (export '(%array-fill-pointer %array-fill-pointer-p %array-available-elements %array-data-vector %array-displacement @@ -318,7 +319,11 @@ values-type-allowp values-type-intersect values-type-intersection values-type-keyp values-type-keywords values-type-optional values-type-p values-type-required values-type-rest - values-type-union values-types values-types-intersect void)) + values-type-union values-types values-types-intersect void + %unary-truncate %make-ratio %make-complex %single-float %double-float + decode-single-float decode-double-float integer-decode-single-float + integer-decode-double-float scale-single-float scale-double-float + single-float-exponent double-float-exponent)) (in-package "EXTENSIONS") @@ -507,7 +512,18 @@ vector-structure-subtype vector-valid-hashing-subtype vector-must-rehash-subtype vm-version word-bits word-bytes word-shift weak-pointer-type weak-pointer-size - weak-pointer-value-slot weak-pointer-next-slot)) + weak-pointer-value-slot weak-pointer-next-slot + + single-float-bias + double-float-bias single-float-significand-byte + double-float-significand-byte + single-float-exponent-byte double-float-exponent-byte + single-float-normal-exponent-max single-float-normal-exponent-min + double-float-normal-exponent-max double-float-normal-exponent-min + single-float-hidden-bit double-float-hidden-bit + float-sign-shift make-single-float make-double-float + single-float-bits double-float-low-bits double-float-high-bits)) + (in-package "C")