: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"