"COMPILE-IN-LEXENV"
"COMPILE-LAMBDA-FOR-DEFUN"
"%COMPILER-DEFUN" "COMPILER-ERROR"
+ "COMPILER-NOTIFY"
+ "COMPILER-STYLE-WARN" "COMPILER-WARN"
"COMPONENT" "COMPONENT-HEADER-LENGTH"
"COMPONENT-INFO" "COMPONENT-LIVE-TN" "COMPUTE-FUN"
"COMPUTE-OLD-NFP" "COPY-MORE-ARG"
"MAKE-OTHER-IMMEDIATE-TYPE" "MAKE-RANDOM-TN"
"MAKE-REPRESENTATION-TN" "MAKE-RESTRICTED-TN" "MAKE-SC-OFFSET"
"MAKE-STACK-POINTER-TN" "MAKE-TN-REF" "MAKE-UNWIND-BLOCK"
- "MAKE-WIRED-TN" "MAYBE-COMPILER-NOTE"
+ "MAKE-WIRED-TN" "MAYBE-COMPILER-NOTIFY"
"MAYBE-INLINE-SYNTACTIC-CLOSURE"
"META-PRIMITIVE-TYPE-OR-LOSE"
"META-SB-OR-LOSE" "META-SC-NUMBER-OR-LOSE" "META-SC-OR-LOSE"
"SC-OFFSET-OFFSET" "SC-OFFSET-SCN" "SC-OR-LOSE" "SC-P" "SC-SB"
"SET-UNWIND-PROTECT" "SET-VECTOR-SUBTYPE"
"SETUP-CLOSURE-ENVIRONMENT" "SETUP-ENVIRONMENT"
- "SPECIFY-SAVE-TN" "INSTANCE-REF"
- "INSTANCE-SET" "TAIL-CALL" "TAIL-CALL-NAMED"
+ "SOURCE-TRANSFORM-LAMBDA"
+ "SPECIFY-SAVE-TN"
+ "TAIL-CALL" "TAIL-CALL-NAMED"
"TAIL-CALL-VARIABLE" "TEMPLATE-OR-LOSE"
"TN" "TN-OFFSET" "TN-P" "TN-REF" "TN-REF-ACROSS" "TN-REF-LOAD-TN"
"TN-REF-NEXT" "TN-REF-NEXT-REF" "TN-REF-P" "TN-REF-TARGET"
;; symbols in package COMMON-LISP. Lots of these symbols are accessed
;; with explicit SB!IMPL:: prefixes in the code. It would be nice to
;; reduce the use of this practice, so if symbols from here which are
- ;; accessed that way are found to belong more appropriately in
- ;; an existing package (e.g. KERNEL or SYS or EXT or FASL), I
- ;; (WHN 19990223) encourage maintainers to move them there..
- ;;
- ;; ..except that it's getting so big and crowded that maybe it should
- ;; be split up, too.
+ ;; accessed that way are found to belong more appropriately in an
+ ;; existing package (e.g. SB!KERNEL or SB!SYS or SB!EXT or SB!FASL),
+ ;; I (WHN 19990223) encourage maintainers to move them there..
#s(sb-cold:package-data
:name "SB!IMPL"
:doc "private: a grab bag of implementation details"
:export (;; Information about how the program was invoked is
;; nonstandard but very useful.
"*POSIX-ARGV*" "POSIX-GETENV" "POSIX-ENVIRON"
-
+
;; People have various good reasons to mess with the GC.
"*AFTER-GC-HOOKS*" "*BEFORE-GC-HOOKS*"
"*GC-NOTIFY-AFTER*" "*GC-NOTIFY-BEFORE*" "*GC-NOTIFY-STREAM*"
;; error reporting, we have
"DEFINE-SOURCE-CONTEXT"
+ ;; and given how many users dislike strict treatment of
+ ;; DEFCONSTANT, let's give them enough rope to escape by
+ "DEFCONSTANT-UNEQL" "DEFCONSTANT-UNEQL-NAME"
+ "DEFCONSTANT-UNEQL-NEW-VALUE" "DEFCONSTANT-UNEQL-OLD-VALUE"
+
+ ;; conditions that can be handled to reduce compiler
+ ;; verbosity
+ "COMPILER-NOTE"
+
;; FIXME: This name doesn't match the DEFFOO - vs. -
;; DEFINE-FOO convention used in the ANSI spec, and so
;; was deprecated in sbcl-0.pre7, ca. 2001-12-12. After
;; miscellaneous useful supported extensions
"QUIT"
"*MODULE-PROVIDER-FUNCTIONS*"
+ "WITH-TIMEOUT" "TIMEOUT"
;; RUN-PROGRAM is not only useful for users, but also
;; useful to implement parts of SBCL itself, so we're
;; return a PROCESS object with operations defined on
;; that object.
"RUN-PROGRAM"
+ "FIND-EXECUTABLE-IN-SEARCH-PATH"
"PROCESS-ALIVE-P" "PROCESS-CLOSE"
"PROCESS-CORE-DUMPED" "PROCESS-ERROR" "PROCESS-EXIT-CODE"
"PROCESS-INPUT" "PROCESS-KILL" "PROCESS-OUTPUT" "PROCESS-P"
"SIMPLE-PROGRAM-ERROR" "SIMPLE-STREAM-ERROR"
"SIMPLE-STYLE-WARNING"
"SPECIAL-FORM-FUNCTION"
- "STYLE-WARN"
-
+ "STYLE-WARN" "SIMPLE-COMPILER-NOTE"
+
;; bootstrapping magic, to make things happen both in
;; the cross-compilation host compiler's environment and
;; in the cross-compiler's environment
;; miscellaneous non-standard but handy user-level functions..
"ASSQ" "DELQ" "MEMQ" "POSQ" "NEQ"
+ "ADJUST-LIST"
"%FIND-PACKAGE-OR-LOSE" "FIND-UNDELETED-PACKAGE-OR-LOSE"
"SANE-PACKAGE"
"CYCLIC-LIST-P"
"COMPOUND-OBJECT-P"
"SWAPPED-ARGS-FUN"
+ "AND/TYPE" "NOT/TYPE"
"ANY/TYPE" "EVERY/TYPE"
"EQUAL-BUT-NO-CAR-RECURSION"
"TYPE-BOUND-NUMBER"
"%BREAK"
"NTH-BUT-WITH-SANE-ARG-ORDER"
"DEPRECATION-WARNING"
+ "BIT-VECTOR-="
;; ..and macros..
"COLLECT"
"INDEX" "LOAD/STORE-INDEX"
"SIGNED-BYTE-WITH-A-BITE-OUT"
"UNSIGNED-BYTE-WITH-A-BITE-OUT"
+ "SFUNCTION"
;; ..and type predicates
"INSTANCEP"
"DOUBLE-FLOAT-P"
"C-STRINGS->STRING-LIST"
;; misc. utilities used internally
+ "DEFINE-FUNCTION-NAME-SYNTAX" "VALID-FUNCTION-NAME-P" ; should be SB!EXT?
"LEGAL-FUN-NAME-P" "LEGAL-FUN-NAME-OR-TYPE-ERROR"
"FUN-NAME-BLOCK-NAME"
"FUN-NAME-INLINE-EXPANSION"
"PROPER-LIST-OF-LENGTH-P"
"LIST-OF-LENGTH-AT-LEAST-P"
"LIST-WITH-LENGTH-P"
+ "SINGLETON-P"
"READ-SEQUENCE-OR-DIE"
"RENAME-KEY-ARGS"
"MISSING-ARG"
"UNIX-NAMESTRING" ; FIXME: perhaps belongs in package SB!UNIX
"FEATUREP"
"FLUSH-STANDARD-OUTPUT-STREAMS"
- "MAKE-GENSYM-LIST"
+ "WITH-UNIQUE-NAMES" "MAKE-GENSYM-LIST"
"ABOUT-TO-MODIFY-SYMBOL-VALUE"
"SYMBOL-SELF-EVALUATING-P"
"PRINT-PRETTY-ON-STREAM-P"
"POSITIVE-PRIMEP"
"EVAL-IN-LEXENV"
"DEBUG-NAMIFY"
+ "FORCE" "DELAY" "PROMISE-READY-P"
;; These could be moved back into SB!EXT if someone has
;; compelling reasons, but hopefully we can get by
"ARRAY-TYPE-DIMENSIONS" "ARRAY-TYPE-ELEMENT-TYPE"
"ARRAY-TYPE-P"
"ARRAY-TYPE-SPECIALIZED-ELEMENT-TYPE" "ASH-INDEX"
- "ASSERT-ERROR" "BASE-CHAR-P"
+ "ASSERT-ERROR" "BASE-CHAR-P" "BASE-STRING-P"
"BINDING-STACK-POINTER-SAP" "BIT-BASH-COPY"
"BIT-INDEX" "BOGUS-ARG-TO-VALUES-LIST-ERROR"
"BOOLE-CODE"
"CODE-DEBUG-INFO" "CODE-HEADER-REF" "CODE-HEADER-SET"
"CODE-INSTRUCTIONS"
"COERCE-TO-FUN" "COERCE-TO-LEXENV"
- "COERCE-TO-LIST" "COERCE-TO-VECTOR"
+ "COERCE-TO-LIST" "COERCE-TO-VALUES"
+ "COERCE-TO-VECTOR"
"*COLD-INIT-COMPLETE-P*"
"COMPLEX-DOUBLE-FLOAT-P"
"COMPLEX-FLOAT-P"
"COPY-BYTE-VECTOR-TO-SYSTEM-AREA"
"CSUBTYPEP" "CTYPE" "TYPE-HASH-VALUE"
"CTYPE-OF" "CTYPE-P" "CTYPEP" "CURRENT-FP" "CURRENT-SP"
+ "CURRENT-DYNAMIC-SPACE-START"
"DATA-VECTOR-REF" "DATA-VECTOR-SET" "DECODE-DOUBLE-FLOAT"
#!+long-float "DECODE-LONG-FLOAT"
"DECODE-SINGLE-FLOAT"
"FLOAT-EXPONENT" "FLOAT-FORMAT-DIGITS" "FLOAT-FORMAT-NAME"
"FLOAT-FORMAT-MAX" "FLOATING-POINT-EXCEPTION"
"FORM" "*FREE-INTERRUPT-CONTEXT-INDEX*" "FUNCALLABLE-INSTANCE-P"
- "FUN-CODE-HEADER"
+ "FUN-CODE-HEADER"
"FUN-TYPE" "FUN-TYPE-ALLOWP"
"FUN-TYPE-KEYP" "FUN-TYPE-KEYWORDS"
"FUN-TYPE-NARGS" "FUN-TYPE-OPTIONAL"
"FUN-TYPE-P"
"FUN-TYPE-REQUIRED" "FUN-TYPE-REST"
"FUN-TYPE-RETURNS" "FUN-TYPE-WILD-ARGS"
- "FUN-WORD-OFFSET" "GET-CLOSURE-LENGTH"
+ "FUN-WORD-OFFSET"
+ "GENERALIZED-BOOLEAN"
+ "GET-CLOSURE-LENGTH"
"GET-HEADER-DATA"
"GET-LISP-OBJ-ADDRESS" "LOWTAG-OF"
"WIDETAG-OF"
"MAKE-NULL-LEXENV" "MAKE-NULL-INTERACTIVE-LEXENV"
"MAKE-NUMERIC-TYPE"
"MAKE-SINGLE-FLOAT" "MAKE-SPECIALIZABLE-ARRAY"
+ "MAKE-UNPORTABLE-FLOAT"
"%MAKE-INSTANCE"
+ "MAKE-SHORT-VALUES-TYPE"
+ "MAKE-SINGLE-VALUE-TYPE"
"MAKE-VALUE-CELL"
"MAKE-VALUES-TYPE"
- "MAYBE-GC" "MEMBER-TYPE" "MEMBER-TYPE-MEMBERS"
+ "MEMBER-TYPE" "MEMBER-TYPE-MEMBERS"
"MEMBER-TYPE-P" "MERGE-BITS" "MODIFIED-NUMERIC-TYPE"
"MUTATOR-SELF"
"NAMED-TYPE" "NAMED-TYPE-NAME" "NAMED-TYPE-P"
"NATIVE-BYTE-ORDER" "NEGATE"
"NEGATION-TYPE" "NEGATION-TYPE-TYPE"
- "NEVER-SUBTYPEP" "NIL-FUN-RETURNED-ERROR"
+ "NEVER-SUBTYPEP" "NIL-ARRAY-ACCESSED-ERROR"
+ "NIL-FUN-RETURNED-ERROR"
"NOT-<=-ERROR" "NOT-=-ERROR"
"NOT-DUMPED-AT-ALL"
"NUMERIC-CONTAGION" "NUMERIC-TYPE"
"NUMERIC-TYPE-FORMAT"
"NUMERIC-TYPE-HIGH" "NUMERIC-TYPE-LOW" "NUMERIC-TYPE-P"
"OBJECT-NOT-ARRAY-ERROR" "OBJECT-NOT-BASE-CHAR-ERROR"
+ "OBJECT-NOT-BASE-STRING-ERROR"
"OBJECT-NOT-BIGNUM-ERROR" "OBJECT-NOT-BIT-VECTOR-ERROR"
"OBJECT-NOT-COMPLEX-ERROR"
"OBJECT-NOT-COMPLEX-FLOAT-ERROR"
"OBJECT-NOT-SIMPLE-ARRAY-DOUBLE-FLOAT-ERROR"
"OBJECT-NOT-SIMPLE-ARRAY-ERROR"
#!+long-float "OBJECT-NOT-SIMPLE-ARRAY-LONG-FLOAT-ERROR"
+ "OBJECT-NOT-SIMPLE-ARRAY-NIL-ERROR"
"OBJECT-NOT-SIMPLE-ARRAY-SINGLE-FLOAT-ERROR"
"OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-16-ERROR"
"OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-2-ERROR"
"OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-32-ERROR"
"OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-8-ERROR"
"OBJECT-NOT-SIMPLE-BIT-VECTOR-ERROR"
+ "OBJECT-NOT-SIMPLE-BASE-STRING-ERROR"
"OBJECT-NOT-SIMPLE-STRING-ERROR"
"OBJECT-NOT-SIMPLE-VECTOR-ERROR"
"OBJECT-NOT-SINGLE-FLOAT-ERROR" "OBJECT-NOT-STRING-ERROR"
"SIMPLE-ARRAY-COMPLEX-SINGLE-FLOAT-P"
"SIMPLE-ARRAY-DOUBLE-FLOAT-P"
#!+long-float "SIMPLE-ARRAY-LONG-FLOAT-P"
+ "SIMPLE-ARRAY-NIL-P"
"SIMPLE-ARRAY-P"
"SIMPLE-ARRAY-SINGLE-FLOAT-P"
"SIMPLE-ARRAY-UNSIGNED-BYTE-16-P"
"SIMPLE-ARRAY-SIGNED-BYTE-30-P"
"SIMPLE-ARRAY-SIGNED-BYTE-32-P"
"SIMPLE-ARRAY-SIGNED-BYTE-8-P"
+ "SIMPLE-BASE-STRING-P"
"SIMPLE-PACKAGE-ERROR"
"SIMPLE-UNBOXED-ARRAY"
"SINGLE-FLOAT-BITS" "SINGLE-FLOAT-EXPONENT"
"SPECIFIER-TYPE" "STACK-REF"
"STREAMLIKE" "STRINGABLE"
"STRUCTURE-RAW-SLOT-TYPE-AND-SIZE"
+ "SUB-GC"
"%INSTANCE-LENGTH"
"%INSTANCE-REF" "%INSTANCE-SET"
"SYSTEM-AREA-CLEAR"
- "SYSTEM-AREA-COPY" "TWO-ARG-*"
+ "SYSTEM-AREA-COPY"
+ "TWO-ARG-*"
"TWO-ARG-+" "TWO-ARG--"
"TWO-ARG-/" "TWO-ARG-/=" "TWO-ARG-<"
"TWO-ARG-<=" "TWO-ARG-="
"TYPE-DIFFERENCE" "TYPE-EXPAND"
"TYPE-INTERSECTION" "TYPE-INTERSECTION2"
"TYPE-APPROX-INTERSECTION2"
+ "TYPE-SINGLE-VALUE-P"
"TYPE-SPECIFIER" "TYPE-UNION" "TYPE/=" "TYPE="
"TYPES-EQUAL-OR-INTERSECT"
"UNBOUND-SYMBOL-ERROR" "UNBOXED-ARRAY"
"VALUES-SPECIFIER-TYPE"
"VALUES-SPECIFIER-TYPE-CACHE-CLEAR" "VALUES-SUBTYPEP"
"VALUES-TYPE"
- "VALUES-TYPE-INTERSECTION" "VALUES-TYPE-KEYP"
- "VALUES-TYPE-KEYWORDS" "VALUES-TYPE-OPTIONAL"
+ "VALUES-TYPE-ERROR"
+ "VALUES-TYPE-INTERSECTION"
+ "VALUES-TYPE-OPTIONAL"
"VALUES-TYPE-P" "VALUES-TYPE-REQUIRED"
"VALUES-TYPE-REST" "VALUES-TYPE-UNION"
- "VALUES-TYPES" "VALUES-TYPES-EQUAL-OR-INTERSECT" "VECTOR-T-P"
+ "VALUES-TYPE-TYPES" "VALUES-TYPES"
+ "VALUES-TYPE-START"
+ "VALUES-TYPES-EQUAL-OR-INTERSECT" "VECTOR-T-P"
+ "VECTOR-NIL-P"
"VECTOR-TO-VECTOR*"
"VECTOR-OF-CHECKED-LENGTH-GIVEN-LENGTH"
"WITH-ARRAY-DATA"
"LAYOUT-PURE" "DSD-RAW-TYPE"
"DEFSTRUCT-DESCRIPTION" "UNDEFINE-STRUCTURE"
"DD-COPIER" "UNDEFINE-FUN-NAME" "DD-TYPE"
- "CLASS-STATE" "INSTANCE"
+ "CLASSOID-STATE" "INSTANCE"
"*TYPE-SYSTEM-INITIALIZED*" "FIND-LAYOUT"
"DSD-NAME" "%TYPEP" "DD-RAW-INDEX"
- "DD-NAME" "CLASS-SUBCLASSES"
- "CLASS-LAYOUT" "CLASS-%NAME"
+ "DD-NAME" "CLASSOID-SUBCLASSES"
+ "CLASSOID-LAYOUT" "CLASSOID-NAME" "CLASSOID-P"
"DD-RAW-LENGTH" "NOTE-NAME-DEFINED"
"%CODE-CODE-SIZE" "DD-SLOTS"
+ "DD-INCLUDE" "SLOT-SETTER-LAMBDA-FORM"
"%IMAGPART" "DSD-ACCESSOR-NAME"
- "%CODE-DEBUG-INFO" "DSD-%NAME"
- "LAYOUT-CLASS" "LAYOUT-INVALID"
+ "%CODE-DEBUG-INFO"
+ "LAYOUT-CLASSOID" "LAYOUT-INVALID"
"%SIMPLE-FUN-NAME" "DSD-TYPE" "%INSTANCEP"
"DEFSTRUCT-SLOT-DESCRIPTION" "%SIMPLE-FUN-ARGLIST"
"%SIMPLE-FUN-NEXT" "LAYOUT-CLOS-HASH-LENGTH" "DD-PREDICATE-NAME"
- "CLASS-PROPER-NAME" "%NOTE-TYPE-DEFINED" "LAYOUT-INFO"
+ "CLASSOID-PROPER-NAME" "%NOTE-TYPE-DEFINED" "LAYOUT-INFO"
"%SET-INSTANCE-LAYOUT" "DD-DEFAULT-CONSTRUCTOR"
"LAYOUT-OF" "%SIMPLE-FUN-SELF" "%REALPART"
- "STRUCTURE-CLASS-P" "DSD-INDEX"
+ "STRUCTURE-CLASSOID-P" "DSD-INDEX"
+ "STRUCTURE-CLASSOID"
"%INSTANCE-LAYOUT" "LAYOUT-CLOS-HASH"
"%SIMPLE-FUN-TYPE" "PROCLAIM-AS-FUN-NAME"
"BECOME-DEFINED-FUN-NAME"
- "%NUMERATOR" "CLASS-TYPEP"
+ "%NUMERATOR" "CLASSOID-TYPEP"
"DSD-READ-ONLY"
+ "DSD-DEFAULT"
"LAYOUT-INHERITS" "DD-LENGTH" "%CODE-ENTRY-POINTS"
"%DENOMINATOR"
- "MAKE-STANDARD-CLASS"
- "CLASS-CELL-TYPEP"
- "FIND-CLASS-CELL" "EXTRACT-FUN-TYPE"
- "FUNCALLABLE-STRUCTURE-CLASS"
+
+ "STANDARD-CLASSOID"
+ "CLASSOID-OF"
+ "MAKE-STANDARD-CLASSOID"
+ "CLASSOID-CELL-TYPEP"
+ "FIND-CLASSOID-CELL" "EXTRACT-FUN-TYPE"
+ "FUNCALLABLE-STRUCTURE-CLASSOID"
"%RANDOM-DOUBLE-FLOAT"
#!+long-float "%RANDOM-LONG-FLOAT"
"%RANDOM-SINGLE-FLOAT"
- "RANDOM-PCL-CLASS"
+ "RANDOM-PCL-CLASSOID"
"%FUNCALLABLE-INSTANCE-INFO" "RANDOM-CHUNK"
- "MAKE-FUNCALLABLE-STRUCTURE-CLASS" "LAYOUT-CLOS-HASH-MAX"
- "CLASS-CELL-NAME" "BUILT-IN-CLASS-DIRECT-SUPERCLASSES"
+ "MAKE-FUNCALLABLE-STRUCTURE-CLASSOID" "LAYOUT-CLOS-HASH-MAX"
+ "CLASSOID-CELL-NAME" "BUILT-IN-CLASSOID-DIRECT-SUPERCLASSES"
+ "BUILT-IN-CLASSOID-TRANSLATION"
"RANDOM-LAYOUT-CLOS-HASH"
- "CLASS-PCL-CLASS" "FUNCALLABLE-STRUCTURE"
+ "CLASSOID-PCL-CLASS" "FUNCALLABLE-STRUCTURE"
"FUNCALLABLE-INSTANCE-FUN"
"%FUNCALLABLE-INSTANCE-LAYOUT"
- "BASIC-STRUCTURE-CLASS"
- "CLASS-CELL-CLASS"
- "FUNCALLABLE-STRUCTURE-CLASS-P" "REGISTER-LAYOUT"
+ "BASIC-STRUCTURE-CLASSOID"
+ "CLASSOID-CELL-CLASSOID"
+ "FUNCALLABLE-STRUCTURE-CLASSOID-P" "REGISTER-LAYOUT"
"FUNCALLABLE-INSTANCE" "RANDOM-FIXNUM-MAX"
- "MAKE-RANDOM-PCL-CLASS" "INSTANCE-LAMBDA"
+ "MAKE-RANDOM-PCL-CLASSOID" "INSTANCE-LAMBDA"
"%FUNCALLABLE-INSTANCE-LEXENV" "%MAKE-SYMBOL"
"%FUNCALLABLE-INSTANCE-FUN" "SYMBOL-HASH"
- "MAKE-UNDEFINED-CLASS" "CLASS-DIRECT-SUPERCLASSES" "MAKE-LAYOUT"
- "REDEFINE-LAYOUT-WARNING" "SLOT-CLASS"
- "INSURED-FIND-CLASS" "ORDER-LAYOUT-INHERITS"
+ "BUILT-IN-CLASSOID"
+ "CONDITION-CLASSOID-P" "CONDITION-CLASSOID-SLOTS"
+ "MAKE-UNDEFINED-CLASSOID" "FIND-CLASSOID" "CLASSOID"
+ "CLASSOID-DIRECT-SUPERCLASSES" "MAKE-LAYOUT"
+ "REDEFINE-LAYOUT-WARNING" "SLOT-CLASSOID"
+ "INSURED-FIND-CLASSOID" "ORDER-LAYOUT-INHERITS"
"STD-COMPUTE-CLASS-PRECEDENCE-LIST"
;; symbols from former SB!CONDITIONS
"*HANDLER-CLUSTERS*" "*RESTART-CLUSTERS*"
+ "*CONDITION-RESTARTS*"
"SHOW-CONDITION" "CASE-FAILURE"
"NAMESTRING-PARSE-ERROR" "NAMESTRING-PARSE-ERROR-OFFSET"
- "DESCRIBE-CONDITION"
+ "DESCRIBE-CONDITION" "MAKE-RESTART" "COERCE-TO-CONDITION"
+ "CONDITION-READER-FUNCTION" "CONDITION-WRITER-FUNCTION"
+
+ "CONDITION-SLOT-ALLOCATION" "CONDITION-SLOT-DOCUMENTATION"
+ "CONDITION-SLOT-INITARGS" "CONDITION-SLOT-INITFORM"
+ "CONDITION-SLOT-INITFORM-P" "CONDITION-SLOT-NAME"
+ "CONDITION-SLOT-READERS" "CONDITION-SLOT-WRITERS"
+
"!COLD-INIT" "!UNINTERN-INIT-ONLY-STUFF"
"!GLOBALDB-COLD-INIT" "!FDEFN-COLD-INIT"
+ "!FUNCTION-NAMES-COLD-INIT"
"!TYPE-CLASS-COLD-INIT" "!TYPEDEFS-COLD-INIT"
"!ALIEN-TYPE-COLD-INIT" "!CLASSES-COLD-INIT"
"!EARLY-TYPE-COLD-INIT" "!LATE-TYPE-COLD-INIT"
"!PACKAGE-COLD-INIT" "SIGNAL-COLD-INIT-OR-REINIT"
"!POLICY-COLD-INIT-OR-RESANIFY" "!VM-TYPE-COLD-INIT"
"!BACKQ-COLD-INIT" "!SHARPM-COLD-INIT"
+ "!EARLY-PROCLAIM-COLD-INIT" "!LATE-PROCLAIM-COLD-INIT"
"!CLASS-FINALIZE" "GC-REINIT"
;; Note: These are out of lexicographical order because in CMU CL
"%ARRAY-TYPEP" "%SET-SAP-REF-DESCRIPTOR"))
#s(sb-cold:package-data
+ :name "SB!THREAD"
+ :use ("CL" "SB!ALIEN" "SB!INT")
+ :doc "public (but low-level): native thread support"
+ :export ("MAKE-THREAD"
+ "MAKE-LISTENER-THREAD" "DESTROY-THREAD" "WITH-RECURSIVE-LOCK"
+ "MUTEX" "MAKE-MUTEX" "GET-MUTEX" "RELEASE-MUTEX" "WITH-MUTEX"
+ "WAITQUEUE" "MAKE-WAITQUEUE" "CONDITION-WAIT" "CONDITION-NOTIFY"
+ "WITH-RECURSIVE-LOCK" "RELEASE-FOREGROUND" "CURRENT-THREAD-ID"))
+
+ #s(sb-cold:package-data
:name "SB!LOOP"
:doc "private: implementation details of LOOP"
:use ("CL")
:export ())
#s(sb-cold:package-data
+ :name "SB!MOP"
+ :doc
+ "public: the MetaObject Protocol interface, as defined by
+The Art of the Metaobject Protocol, by Kiczales, des Rivieres and Bobrow:
+ISBN 0-262-61074-4, with exceptions as noted in the User Manual."
+ :use ("CL" "SB!PCL")
+ :reexport ("ADD-DEPENDENT"
+ "ADD-DIRECT-METHOD"
+ "ADD-DIRECT-SUBCLASS"
+ "ADD-METHOD"
+ "ALLOCATE-INSTANCE"
+ "BUILT-IN-CLASS"
+ "CLASS"
+ "CLASS-DEFAULT-INITARGS"
+ "CLASS-DIRECT-DEFAULT-INITARGS"
+ "CLASS-DIRECT-SLOTS"
+ "CLASS-DIRECT-SUBCLASSES"
+ "CLASS-DIRECT-SUPERCLASSES"
+ "CLASS-FINALIZED-P"
+ "CLASS-NAME"
+ "CLASS-PRECEDENCE-LIST"
+ "CLASS-PROTOTYPE"
+ "CLASS-SLOTS"
+ "COMPUTE-APPLICABLE-METHODS"
+ "COMPUTE-APPLICABLE-METHODS-USING-CLASSES"
+ "COMPUTE-CLASS-PRECEDENCE-LIST"
+ "COMPUTE-DEFAULT-INITARGS"
+ "COMPUTE-DISCRIMINATING-FUNCTION"
+ "COMPUTE-EFFECTIVE-METHOD"
+ "COMPUTE-EFFECTIVE-SLOT-DEFINITION"
+ "COMPUTE-SLOTS"
+ "DIRECT-SLOT-DEFINITION"
+ "DIRECT-SLOT-DEFINITION-CLASS"
+ "EFFECTIVE-SLOT-DEFINITION"
+ "EFFECTIVE-SLOT-DEFINITION-CLASS"
+ "ENSURE-CLASS"
+ "ENSURE-CLASS-USING-CLASS"
+ "ENSURE-GENERIC-FUNCTION"
+ "ENSURE-GENERIC-FUNCTION-USING-CLASS"
+ "EQL-SPECIALIZER"
+ "EQL-SPECIALIZER-OBJECT"
+ "EXTRACT-LAMBDA-LIST"
+ "EXTRACT-SPECIALIZER-NAMES"
+ "FINALIZE-INHERITANCE"
+ "FIND-METHOD-COMBINATION"
+ "FORWARD-REFERENCED-CLASS"
+ "FUNCALLABLE-STANDARD-CLASS"
+ "FUNCALLABLE-STANDARD-INSTANCE-ACCESS"
+ "FUNCALLABLE-STANDARD-OBJECT"
+ "FUNCTION"
+ "GENERIC-FUNCTION"
+ "GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER"
+ "GENERIC-FUNCTION-DECLARATIONS"
+ "GENERIC-FUNCTION-LAMBDA-LIST"
+ "GENERIC-FUNCTION-METHOD-CLASS"
+ "GENERIC-FUNCTION-METHOD-COMBINATION"
+ "GENERIC-FUNCTION-METHODS"
+ "GENERIC-FUNCTION-NAME"
+ "INTERN-EQL-SPECIALIZER"
+ "MAKE-METHOD-LAMBDA"
+ "MAKE-INSTANCE"
+ "MAP-DEPENDENTS"
+ ;; KLUDGE: See the User Manual
+ ;; "METAOBJECT"
+ "METHOD"
+ "METHOD-COMBINATION"
+ "METHOD-FUNCTION"
+ "METHOD-GENERIC-FUNCTION"
+ "METHOD-LAMBDA-LIST"
+ "METHOD-QUALIFIERS"
+ "METHOD-SPECIALIZERS"
+ "ACCESSOR-METHOD-SLOT-DEFINITION"
+ "READER-METHOD-CLASS"
+ "REMOVE-DEPENDENT"
+ "REMOVE-DIRECT-METHOD"
+ "REMOVE-DIRECT-SUBCLASS"
+ "REMOVE-METHOD"
+ "SET-FUNCALLABLE-INSTANCE-FUNCTION"
+ "SLOT-BOUNDP-USING-CLASS"
+ "SLOT-DEFINITION"
+ "SLOT-DEFINITION-ALLOCATION"
+ "SLOT-DEFINITION-INITARGS"
+ "SLOT-DEFINITION-INITFORM"
+ "SLOT-DEFINITION-INITFUNCTION"
+ "SLOT-DEFINITION-LOCATION"
+ "SLOT-DEFINITION-NAME"
+ "SLOT-DEFINITION-READERS"
+ "SLOT-DEFINITION-WRITERS"
+ "SLOT-DEFINITION-TYPE"
+ "SLOT-MAKUNBOUND-USING-CLASS"
+ "SLOT-VALUE-USING-CLASS"
+ "SPECIALIZER"
+ "SPECIALIZER-DIRECT-GENERIC-FUNCTIONS"
+ "SPECIALIZER-DIRECT-METHODS"
+ "STANDARD-ACCESSOR-METHOD"
+ "STANDARD-CLASS"
+ "STANDARD-DIRECT-SLOT-DEFINITION"
+ "STANDARD-EFFECTIVE-SLOT-DEFINITION"
+ "STANDARD-GENERIC-FUNCTION"
+ "STANDARD-INSTANCE-ACCESS"
+ "STANDARD-METHOD"
+ "STANDARD-OBJECT"
+ "STANDARD-READER-METHOD"
+ "STANDARD-SLOT-DEFINITION"
+ "STANDARD-WRITER-METHOD"
+ "T"
+ "UPDATE-DEPENDENT"
+ "VALIDATE-SUPERCLASS"
+ "WRITER-METHOD-CLASS"))
+
+ #s(sb-cold:package-data
:name "SB!PCL"
:doc
"semi-public: This package includes useful meta-object protocol
extensions, but even they are not guaranteed to be present in
later versions of SBCL, and the other stuff in here is
definitely not guaranteed to be present in later versions of SBCL."
- ;; FIXME: SB-PCL should probably USE-PACKAGE SB-KERNEL, since SB-PCL
- ;; is built on SB-KERNEL, and in the absence of USE-PACKAGE, it ends
- ;; up using a thundering herd of explicit prefixes to get to
- ;; SB-KERNEL symbols. However, it'll probably be too messy to do
- ;; this until the duplicate SB-PCL:CLASS/CL:CLASS hierarchy kludge
- ;; is unscrewed, since until it is there are too many things which
- ;; conflict between the two packages.
- :use ("CL" "SB!INT" "SB!EXT" "SB!WALKER")
- :import-from (("SB!KERNEL" "FUNCALLABLE-INSTANCE-P" "%FUN-DOC"
- "PACKAGE-DOC-STRING"
- "PACKAGE-HASHTABLE-SIZE" "PACKAGE-HASHTABLE-FREE"
- "PACKAGE-INTERNAL-SYMBOLS" "PACKAGE-EXTERNAL-SYMBOLS"))
+ :use ("CL" "SB!INT" "SB!EXT" "SB!WALKER" "SB!KERNEL")
+ ;; FIXME: After a little while, these reexports can probably go
+ ;; away, as they're superseded by the use of SB-MOP as the
+ ;; publically-accessible package.
:reexport ("ADD-METHOD" "ALLOCATE-INSTANCE"
- "COMPUTE-APPLICABLE-METHODS"
- "ENSURE-GENERIC-FUNCTION"
- "MAKE-INSTANCE" "METHOD-QUALIFIERS"
- "REMOVE-METHOD")
+ "CLASS-NAME" "COMPUTE-APPLICABLE-METHODS"
+ "ENSURE-GENERIC-FUNCTION" "MAKE-INSTANCE"
+ "METHOD-QUALIFIERS" "REMOVE-METHOD")
:export ("ADD-DEPENDENT"
"ADD-DIRECT-METHOD"
"ADD-DIRECT-SUBCLASS"
"CLASS-SLOTS"
"COMPUTE-APPLICABLE-METHODS-USING-CLASSES"
"COMPUTE-CLASS-PRECEDENCE-LIST"
+ "COMPUTE-DEFAULT-INITARGS"
"COMPUTE-DISCRIMINATING-FUNCTION"
"COMPUTE-EFFECTIVE-METHOD"
"COMPUTE-EFFECTIVE-SLOT-DEFINITION"
"COMPUTE-SLOTS"
+ "DIRECT-SLOT-DEFINITION"
"DIRECT-SLOT-DEFINITION-CLASS"
+ "EFFECTIVE-SLOT-DEFINITION"
"EFFECTIVE-SLOT-DEFINITION-CLASS"
"ENSURE-CLASS"
"ENSURE-CLASS-USING-CLASS"
"ENSURE-GENERIC-FUNCTION-USING-CLASS"
- "EQL-SPECIALIZER-INSTANCE"
+ "EQL-SPECIALIZER"
+ "EQL-SPECIALIZER-OBJECT"
"EXTRACT-LAMBDA-LIST"
"EXTRACT-SPECIALIZER-NAMES"
"FINALIZE-INHERITANCE"
"FIND-METHOD-COMBINATION"
+ "FORWARD-REFERENCED-CLASS"
+ "FUNCALLABLE-STANDARD-CLASS"
"FUNCALLABLE-STANDARD-INSTANCE-ACCESS"
+ "FUNCALLABLE-STANDARD-OBJECT"
"GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER"
"GENERIC-FUNCTION-DECLARATIONS"
"GENERIC-FUNCTION-LAMBDA-LIST"
"REMOVE-DEPENDENT"
"REMOVE-DIRECT-METHOD"
"REMOVE-DIRECT-SUBCLASS"
- "SET-FUNCALLABLE-INSTANCE-FUN"
+ "SET-FUNCALLABLE-INSTANCE-FUNCTION"
"SLOT-BOUNDP-USING-CLASS"
+ "SLOT-DEFINITION"
"SLOT-DEFINITION-ALLOCATION"
"SLOT-DEFINITION-INITARGS"
"SLOT-DEFINITION-INITFORM"
"SLOT-DEFINITION-TYPE"
"SLOT-MAKUNBOUND-USING-CLASS"
"SLOT-VALUE-USING-CLASS"
- "SPECIALIZER-DIRECT-GENERIC-FUNCTION"
+ "SPECIALIZER"
+ "SPECIALIZER-DIRECT-GENERIC-FUNCTIONS"
"SPECIALIZER-DIRECT-METHODS"
+ "STANDARD-ACCESSOR-METHOD"
+ "STANDARD-DIRECT-SLOT-DEFINITION"
+ "STANDARD-EFFECTIVE-SLOT-DEFINITION"
"STANDARD-INSTANCE-ACCESS"
+ "STANDARD-READER-METHOD"
+ "STANDARD-SLOT-DEFINITION"
+ "STANDARD-WRITER-METHOD"
"UPDATE-DEPENDENT"
"VALIDATE-SUPERCLASS"
"WRITER-METHOD-CLASS"))
"COMPLEX-SINGLE-FLOAT-IMAG-SLOT" "COMPLEX-SINGLE-FLOAT-REAL-SLOT"
"COMPLEX-SINGLE-FLOAT-SIZE" "COMPLEX-SINGLE-FLOAT-WIDETAG"
"COMPLEX-SINGLE-REG-SC-NUMBER" "COMPLEX-SINGLE-STACK-SC-NUMBER"
- "COMPLEX-SIZE" "COMPLEX-STRING-WIDETAG" "COMPLEX-WIDETAG"
+ "COMPLEX-SIZE" "COMPLEX-BASE-STRING-WIDETAG" "COMPLEX-WIDETAG"
+ "COMPLEX-VECTOR-NIL-WIDETAG"
"COMPLEX-VECTOR-WIDETAG" "CONS-CAR-SLOT" "CONS-CDR-SLOT"
"CONS-SIZE" "CONSTANT-SC-NUMBER"
"CONTEXT-FLOATING-POINT-MODES" "CONTEXT-FLOAT-REGISTER"
"CONTEXT-PC" "CONTEXT-REGISTER"
"CONTROL-STACK-SC-NUMBER" "COUNT-NO-OPS"
"*CURRENT-CATCH-BLOCK*"
- "CURRENT-DYNAMIC-SPACE-START"
"CURRENT-FLOAT-TRAP" "DEFINE-FOR-EACH-PRIMITIVE-OBJECT"
"DESCRIPTOR-REG-SC-NUMBER" "DESCRIPTOR-VS-NON-DESCRIPTOR-STORAGE"
"DOUBLE-FLOAT-EXPONENT-BYTE" "DOUBLE-FLOAT-BIAS"
"SIMPLE-ARRAY-COMPLEX-SINGLE-FLOAT-WIDETAG"
"SIMPLE-ARRAY-DOUBLE-FLOAT-WIDETAG"
#!+long-float "SIMPLE-ARRAY-LONG-FLOAT-WIDETAG"
+ "SIMPLE-ARRAY-NIL-WIDETAG"
"SIMPLE-ARRAY-SINGLE-FLOAT-WIDETAG"
"SIMPLE-ARRAY-WIDETAG" "SIMPLE-ARRAY-UNSIGNED-BYTE-16-WIDETAG"
"SIMPLE-ARRAY-UNSIGNED-BYTE-2-WIDETAG"
"SIMPLE-ARRAY-SIGNED-BYTE-32-WIDETAG"
"SIMPLE-ARRAY-SIGNED-BYTE-8-WIDETAG"
"SIMPLE-BIT-VECTOR-WIDETAG"
- "SIMPLE-STRING-WIDETAG"
+ "SIMPLE-BASE-STRING-WIDETAG"
"SIMPLE-VECTOR-WIDETAG" "SINGLE-FLOAT-BIAS"
"SINGLE-FLOAT-DIGITS" "SINGLE-FLOAT-EXPONENT-BYTE"
"SINGLE-FLOAT-HIDDEN-BIT" "SINGLE-FLOAT-NORMAL-EXPONENT-MAX"
"SYMBOL-HASH-SLOT" "SYMBOL-HEADER-WIDETAG" "SYMBOL-NAME-SLOT"
"SYMBOL-PACKAGE-SLOT" "SYMBOL-PLIST-SLOT"
"SYMBOL-SIZE" "SYMBOL-UNUSED-SLOT" "SYMBOL-VALUE-SLOT"
- "BINDING-STACK-START" "BINDING-STACK-END"
- "CONTROL-STACK-START" "CONTROL-STACK-END"
+ "*BINDING-STACK-START*"
+ "*CONTROL-STACK-START*" "*CONTROL-STACK-END*"
+ "CONTROL-STACK-POINTER-VALID-P"
"DYNAMIC-SPACE-START" "DYNAMIC-SPACE-END"
#!+c-stack-is-control-stack "ALTERNATE-SIGNAL-STACK-START"
#!-gencgc "DYNAMIC-0-SPACE-START"
projects / sbcl.git / blobdiff