;; timer
"TIMER" "MAKE-TIMER" "TIMER-NAME" "TIMER-SCHEDULED-P"
- "SCHEDULE-TIMER" "UNSCHEDULE-TIMER" "LIST-ALL-TIMERS"))
+ "SCHEDULE-TIMER" "UNSCHEDULE-TIMER" "LIST-ALL-TIMERS"
+
+ ;; SIMD pack
+ #!+sb-simd-pack "SIMD-PACK"
+ #!+sb-simd-pack "SIMD-PACK-P"
+ #!+sb-simd-pack "%MAKE-SIMD-PACK-UB32"
+ #!+sb-simd-pack "%MAKE-SIMD-PACK-UB64"
+ #!+sb-simd-pack "%MAKE-SIMD-PACK-DOUBLE"
+ #!+sb-simd-pack "%MAKE-SIMD-PACK-SINGLE"
+ #!+sb-simd-pack "%SIMD-PACK-UB32S"
+ #!+sb-simd-pack "%SIMD-PACK-UB64S"
+ #!+sb-simd-pack "%SIMD-PACK-DOUBLES"
+ #!+sb-simd-pack "%SIMD-PACK-SINGLES"))
#s(sb-cold:package-data
:name "SB!FORMAT"
is a good idea, but see SB-SYS re. blurring of boundaries."
:use ("CL" "SB!ALIEN" "SB!ALIEN-INTERNALS" "SB!BIGNUM"
"SB!EXT" "SB!FASL" "SB!INT" "SB!SYS" "SB!GRAY")
- :reexport ("DEF!STRUCT" "DEF!MACRO")
+ :reexport ("DEF!STRUCT"
+ "DEF!MACRO"
+ #!+sb-simd-pack "SIMD-PACK"
+ #!+sb-simd-pack "SIMD-PACK-P"
+ #!+sb-simd-pack "%MAKE-SIMD-PACK-UB32"
+ #!+sb-simd-pack "%MAKE-SIMD-PACK-UB64"
+ #!+sb-simd-pack "%MAKE-SIMD-PACK-DOUBLE"
+ #!+sb-simd-pack "%MAKE-SIMD-PACK-SINGLE"
+ #!+sb-simd-pack "%SIMD-PACK-UB32S"
+ #!+sb-simd-pack "%SIMD-PACK-UB64S"
+ #!+sb-simd-pack "%SIMD-PACK-DOUBLES"
+ #!+sb-simd-pack "%SIMD-PACK-SINGLES")
:export ("%ACOS"
"%ACOSH"
"%ADJOIN"
"%ARRAY-FILL-POINTER-P" "%ARRAY-RANK"
#!+(or x86 x86-64 ppc)
"%ARRAY-ATOMIC-INCF/WORD"
+ #!+ash-right-vops "%ASH/RIGHT"
"%ASSOC"
"%ASSOC-EQ"
"%ASSOC-IF"
"%MAKE-RATIO" "%MAKE-LISP-OBJ"
"%MAKE-INSTANCE"
#!+sb-simd-pack "%MAKE-SIMD-PACK"
- #!+sb-simd-pack "%MAKE-SIMD-PACK-UB32"
- #!+sb-simd-pack "%MAKE-SIMD-PACK-UB64"
- #!+sb-simd-pack "%MAKE-SIMD-PACK-DOUBLE"
- #!+sb-simd-pack "%MAKE-SIMD-PACK-SINGLE"
"%MAKE-STRUCTURE-INSTANCE"
"%MAKE-STRUCTURE-INSTANCE-ALLOCATOR"
"%MAP" "%MAP-TO-SIMPLE-VECTOR-ARITY-1"
#!+sb-simd-pack "%SIMD-PACK-TAG"
#!+sb-simd-pack "%SIMD-PACK-LOW"
#!+sb-simd-pack "%SIMD-PACK-HIGH"
- #!+sb-simd-pack "%SIMD-PACK-UB32S"
- #!+sb-simd-pack "%SIMD-PACK-UB64S"
- #!+sb-simd-pack "%SIMD-PACK-SINGLES"
- #!+sb-simd-pack "%SIMD-PACK-DOUBLES"
"%SXHASH-SIMPLE-SUBSTRING" "%TAN" "%TAN-QUICK" "%TANH"
"%UNARY-ROUND"
"%UNARY-TRUNCATE"
#!+sb-simd-pack "SIMD-PACK-SINGLE"
#!+sb-simd-pack "SIMD-PACK-DOUBLE"
#!+sb-simd-pack "SIMD-PACK-INT"
- #!+sb-simd-pack "SIMD-PACK"
- #!+sb-simd-pack "SIMD-PACK-P"
#!+sb-simd-pack "SIMD-PACK-TYPE"
#!+sb-simd-pack "SIMD-PACK-TYPE-ELEMENT-TYPE"
#!+sb-simd-pack "*SIMD-PACK-ELEMENT-TYPES*"