From 801fcbf0eb39c79f8d6966fffb5ff0a9492ed7e8 Mon Sep 17 00:00:00 2001
From: toy <toy>
Date: Fri, 13 Dec 2002 03:23:56 +0000
Subject: [PATCH] Update the exports to get rid of some warnings when compiling
 CMUCL.

---
 code/exports.lisp | 20 ++++++++++++++------
 1 file changed, 14 insertions(+), 6 deletions(-)

diff --git a/code/exports.lisp b/code/exports.lisp
index 5200a14da..4d66de847 100644
--- a/code/exports.lisp
+++ b/code/exports.lisp
@@ -5,7 +5,7 @@
 ;;; Carnegie Mellon University, and has been placed in the public domain.
 ;;;
 (ext:file-comment
-  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.195 2002/11/15 15:08:11 toy Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.196 2002/12/13 03:23:56 toy Exp $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -924,6 +924,7 @@
              "*TOP-LEVEL-AUTO-DECLARE*"
 	     "COMPILER-MACROEXPAND-1" "COMPILER-MACROEXPAND"
              "*UNDEFINED-WARNING-LIMIT*" "ACCEPT-TCP-CONNECTION"
+	     "ACCEPT-UNIX-CONNECTION"
              "ADD-OOB-HANDLER" "AMBIGUOUS-FILES" "ARGUMENT-LIST" "ASSQ"
              "BASIC-DEFINITION" "BIGNUMP" "BITP" "CACHE-HASH-EQ"
              "CALL-USER-MISCOP" "CANCEL-FINALIZATION" "CAREFUL-SYMBOL-FUNCTION"
@@ -935,7 +936,8 @@
              "COMPACT-INFO-ENVIRONMENT" "COMPILE-FROM-STREAM" "COMPILEDP"
              "COMPLETE-FILE" "CONCAT-PNAMES" "CONNECT-TO-INET-SOCKET"
              "CONSTANT" "CONSTANT-ARGUMENT" "CONSTANT-FUNCTION"
-             "CREATE-INET-LISTENER" "CREATE-INET-SOCKET" "DEBUG"
+             "CREATE-INET-LISTENER" "CREATE-INET-SOCKET" "CREATE-UNIX-LISTENER"
+	     "DEBUG"
 	     "DEF-SOURCE-CONTEXT"
              "DEFAULT-CLX-EVENT-HANDLER" "DEFAULT-DIRECTORY"
              "DEFINE-CLX-MODIFIER" "DEFINE-HASH-CACHE" "DEFINE-INFO-CLASS"
@@ -952,7 +954,8 @@
              "FLOAT-NAN-P" "FLOAT-TRAPPING-NAN-P" "FLOATING-POINT-INEXACT"
              "FLOATING-POINT-INVALID" "FLUSH-DISPLAY-EVENTS"
              "FORMAT-DECODED-TIME" "FORMAT-UNIVERSAL-TIME" "FREEZE-TYPE" "GC"
-             "GC-OFF" "GC-ON" "GET-BYTES-CONSED" "GET-CODE-POINTER"
+             "GC-OFF" "GC-ON" "GET-BYTES-CONSED" "GET-BYTES-CONSED-DFIXNUM"
+	     "GET-CODE-POINTER"
              "GET-COMMAND-LINE-SWITCH" "GET-DATA-POINTER"
              "GET-FLOATING-POINT-MODES" "GET-PEER-HOST-AND-PORT"
 	     "GET-SOCKET-HOST-AND-PORT"
@@ -961,6 +964,7 @@
              "HOST-ENTRY-ALIASES" "HOST-ENTRY-NAME" "HTONL" "HTONS"
              "INADDR-ANY" "INDENTING-FURTHER" "INFO"
              "INHIBIT-WARNINGS" "INTERACTIVE-EVAL" "IPPROTO-TCP" "IPPROTO-UDP"
+	     "IP-STRING"
              "ITERATE" "KEY-EVENT" "KEY-EVENT-BIT-P" "KEY-EVENT-BITS"
              "KEY-EVENT-BITS-MODIFIERS" "KEY-EVENT-CHAR" "KEY-EVENT-KEYSYM"
              "KEY-EVENT-MODIFIER-MASK" "KEY-EVENT-P" "KEYSYM-NAMES"
@@ -1457,8 +1461,11 @@
              "MAKE-LOCAL-ALIEN" "NATURALIZE" "NOTE-LOCAL-ALIEN-TYPE"
              "PARSE-ALIEN-TYPE" "UNPARSE-ALIEN-TYPE"))
 (defpackage "PROFILE"
-            (:export "*TIMED-FUNCTIONS*" "PROFILE" "PROFILE-ALL" "REPORT-TIME"
-	     "RESET-TIME" "UNPROFILE"))
+            (:export
+	     "*DEFAULT-REPORT-TIME-PRINTFUNCTION*" "*INSERT-SPACEREPORTS*"
+	     "*TIMED-FUNCTIONS*" "DELETE-SPACEREPORTS" "PRINT-SPACEREPORTS"
+	     "PROFILE" "PROFILE-ALL" "REPORT-TIME" "REPORT-TIME-CUSTOM"
+	     "RESET-SPACEREPORTS" "RESET-TIME" "UNPROFILE" "WITH-SPACEREPORT"))
 (dolist
     (name
      '("ARRAY-RANK" "ARRAY-TOTAL-SIZE" "BOOLEAN" "CHAR-INT" "FLOAT-DIGITS"
@@ -1642,7 +1649,8 @@
 	   "TYPE-INIT" "TYPE-INTERSECT" "TYPE-INTERSECTION" "TYPE-SPECIFIER"
 	   "TYPE-SPECIFIER-SYMBOLS" "TYPE-UNION" "TYPE/=" "TYPE="
 	   "TYPES-INTERSECT" "UNBOUND-SYMBOL-ERROR" "UNBOXED-ARRAY"
-	   "UNDEFINED-SYMBOL-ERROR" "UNION-TYPE" "UNION-TYPE-P"
+	   "UNDEFINED-SYMBOL-ERROR" "UNDEFINED-FOREIGN-SYMBOL-ERROR"
+	   "UNION-TYPE" "UNION-TYPE-P"
 	   "UNION-TYPE-TYPES" "UNKNOWN-ERROR"
 	   "UNKNOWN-KEYWORD-ARGUMENT-ERROR" "UNKNOWN-TYPE" "UNKNOWN-TYPE-P"
 	   "UNKNOWN-TYPE-SPECIFIER" "UNSEEN-THROW-TAG-ERROR"
-- 
GitLab