diff --git a/code/exports.lisp b/code/exports.lisp
index 9421e77f2c2720048af1c5bd7c0808f14a97d01a..39720d56e263deba112dfb717b54c862cd519d25 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.61 1990/12/01 22:24:02 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.62 1990/12/03 20:00:02 wlott Exp $
 ;;;
 ;;; All the stuff necessary to export various symbols from various packages.
 ;;;
@@ -425,12 +425,13 @@
 (use-package "KERNEL")
 (use-package "EXT")
 (use-package "C")
+(use-package "BIGNUM")
 
 (export '(*assembly-unit-length* *primitive-objects* array-data-slot
 	  array-dimensions-offset array-displaced-p-slot
 	  array-displacement-slot array-elements-slot
 	  array-fill-pointer-slot atomic-flag base-character-type
-	  bignum-digits-offset bignum-type binding-size binding-symbol-slot
+	  binding-size binding-symbol-slot
 	  binding-value-slot byte-bits catch-block-current-code-slot
 	  catch-block-current-cont-slot catch-block-current-uwp-slot
 	  catch-block-entry-pc-slot catch-block-previous-catch-slot
@@ -716,6 +717,14 @@
 	  bignum-truncate bignum-plus-p bignum-compare make-small-bignum
 	  bignum-logcount bignum-index bignum-type bignum-element-type))
 
+(export '(bignum-type bignum-element-type bignum-index %allocate-bignum
+	  %bignum-length %bignum-set-length %bignum-ref %bignum-set
+	  %digit-0-or-plusp %add-with-carry %subtract-with-borrow
+	  %multiply-and-add %multiply %lognot %logand %logior %logxor
+	  %fixnum-to-digit %floor %fixnum-digit-with-correct-sign %ashl
+	  %ashr %digit-logical-shift-right))
+
+
 
 (in-package "DEBUG")