"ALIEN-VALUE-SAP" "ALIEN-VALUE-P"
"ALIEN-VALUES-TYPE" "ALIEN-VALUES-TYPE-P"
"ALIEN-VALUES-TYPE-VALUES" "ALIGN-OFFSET" "ALIEN-VOID-TYPE-P"
- "COMPUTE-ALIEN-REP-TYPE"
+ "COMPUTE-ALIEN-REP-TYPE" "COMPUTE-DEPORT-ALLOC-LAMBDA"
"COMPUTE-DEPORT-LAMBDA" "COMPUTE-DEPOSIT-LAMBDA"
"COMPUTE-EXTRACT-LAMBDA" "COMPUTE-LISP-REP-TYPE"
"COMPUTE-NATURALIZE-LAMBDA" "DEFINE-ALIEN-TYPE-CLASS"
- "DEFINE-ALIEN-TYPE-METHOD" "DEFINE-ALIEN-TYPE-TRANSLATOR" "DEPORT"
+ "DEFINE-ALIEN-TYPE-METHOD" "DEFINE-ALIEN-TYPE-TRANSLATOR"
+ "DEPORT" "DEPORT-ALLOC"
"DEPOSIT-ALIEN-VALUE" "DISPOSE-LOCAL-ALIEN"
"*ENTER-ALIEN-CALLBACK*" "ENTER-ALIEN-CALLBACK"
"EXTRACT-ALIEN-VALUE"
"LOCAL-ALIEN-INFO" "LOCAL-ALIEN-INFO-FORCE-TO-MEMORY-P"
"LOCAL-ALIEN-INFO-P" "LOCAL-ALIEN-INFO-TYPE"
"MAKE-ALIEN-FUN-TYPE" "MAKE-ALIEN-POINTER-TYPE"
- "MAKE-ALIEN-VALUE"
+ "MAKE-ALIEN-VALUE" "MAYBE-WITH-PINNED-OBJECTS"
"MAKE-LOCAL-ALIEN" "NATURALIZE"
"NOTE-LOCAL-ALIEN-TYPE"
"PARSE-ALIEN-TYPE" "UNPARSE-ALIEN-TYPE"))
:use ("CL" "SB!KERNEL" "SB!INT" "SB!EXT")
:export ("%ADD-WITH-CARRY"
"%ALLOCATE-BIGNUM" "%ASHL" "%ASHR"
- "%BIGNUM-LENGTH" "%BIGNUM-REF" "%BIGNUM-SET"
+ "%BIGNUM-LENGTH" "%BIGNUM-REF" "%BIGNUM-REF-WITH-OFFSET"
+ "%BIGNUM-SET" "%BIGNUM-SET-WITH-OFFSET"
"%BIGNUM-SET-LENGTH" "%DIGIT-0-OR-PLUSP"
"%DIGIT-LOGICAL-SHIFT-RIGHT"
"%FIXNUM-DIGIT-WITH-CORRECT-SIGN" "%FIXNUM-TO-DIGIT"
"SIGNED-BYTE-WITH-A-BITE-OUT"
"UNSIGNED-BYTE-WITH-A-BITE-OUT"
"SFUNCTION" "UNSIGNED-BYTE*"
+ "CONSTANT-DISPLACEMENT"
;; ..and type predicates
"INSTANCEP"
"DOUBLE-FLOAT-P"
"CONTROL-STACK-POINTER-SAP" "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" "DECLARATION-TYPE-CONFLICT-ERROR"
+ "CURRENT-DYNAMIC-SPACE-START"
+ "DATA-VECTOR-REF" "DATA-VECTOR-REF-WITH-OFFSET"
+ "DATA-VECTOR-SET" "DATA-VECTOR-SET-WITH-OFFSET"
+ "DECLARATION-TYPE-CONFLICT-ERROR"
"DECODE-DOUBLE-FLOAT"
#!+long-float "DECODE-LONG-FLOAT"
"DECODE-SINGLE-FLOAT"
"%MAKE-SYMBOL"
"%FUNCALLABLE-INSTANCE-FUNCTION" "SYMBOL-HASH"
+ "EXTENDED-SEQUENCE" "*EXTENDED-SEQUENCE-TYPE*"
+ "EXTENDED-SEQUENCE-P"
+
"BUILT-IN-CLASSOID" "CONDITION-CLASSOID-P"
"CONDITION-CLASSOID-SLOTS" "MAKE-UNDEFINED-CLASSOID"
"FIND-CLASSOID" "CLASSOID" "CLASSOID-DIRECT-SUPERCLASSES"
:export ("*CURRENT-THREAD*" "THREAD" "MAKE-THREAD"
"THREAD-NAME" "THREAD-ALIVE-P"
"LIST-ALL-THREADS"
+ "JOIN-THREAD" "JOIN-THREAD-ERROR" "JOIN-THREAD-ERROR-THREAD"
"INTERRUPT-THREAD-ERROR"
"INTERRUPT-THREAD-ERROR-THREAD"
"INTERRUPT-THREAD" "TERMINATE-THREAD" "DESTROY-THREAD"