mirror of
git://git.code.sf.net/p/sbcl/sbcl
synced 2026-09-10 07:26:40 -04:00
build-all-cores
This commit is contained in:
Douglas Katzman
parent
81c43250dc
commit
940bb873d1
|
|
@ -412,6 +412,22 @@
|
|||
(#(3A9E0C9 C48E090 7B247926 7DF2363B E48FFF8A)
|
||||
"(PROGN LOCALLY SYMBOL-MACROLET MACROLET EVAL-WHEN)"
|
||||
"((& (>> val 4) 7))")
|
||||
(#(428DC20 B445B28 27168950 5A0CB91B 60BC6EF6 80D0C591 8DECED5A 92FE1EC2 A245F357 AC841474 C17B6FA5 C6B4780F CF5ABDAB F28A2060)
|
||||
"(:BYTE-ARRAY :JUMP-TABLE :FIXUP :COMPLEX-DOUBLE-FLOAT :COMPLEX-SINGLE-FLOAT :DOUBLE-FLOAT :SINGLE-FLOAT :CHARACTER :BASE-CHAR :OWORD :QWORD :DWORD :WORD :BYTE)"
|
||||
"((let ((tab #a((8) (unsigned-byte 8) 0 0 8 14 12 7 11 3)))
|
||||
(let ((b (& val #x7)))
|
||||
(let ((a (>> (<< val 5) 29)))
|
||||
(^ a (aref tab b))))))")
|
||||
(#(428DC20 27168950 5A0CB91B 60BC6EF6 7B3F916F 80D0C591 847A59C4 92FE1EC2 A245F357 AC841474 B6CE09C5 B7C3E8EA C17B6FA5 C3E68CAD
|
||||
CF5ABDAB F28A2060)
|
||||
"(:BYTE-ARRAY :JUMP-TABLE :COMPLEX-DOUBLE-FLOAT :COMPLEX-SINGLE-FLOAT :DOUBLE-FLOAT :SINGLE-FLOAT :AVX512 :ZWORD :AVX2 :HWORD :SSE :OWORD :QWORD :DWORD :WORD :BYTE)"
|
||||
"((let ((tab #a((8) (unsigned-byte 8) 4 5 14 0 5 12 12 0)))
|
||||
(let ((b (& (>> val 5) #x7)))
|
||||
(let ((a (>> (<< val 5) 29)))
|
||||
(^ a (aref tab b))))))")
|
||||
(#(428DC20 27168950 5A0CB91B 8DECED5A 92FE1EC2 C17B6FA5 CF5ABDAB F28A2060)
|
||||
"(:OWORD :BYTE-ARRAY :JUMP-TABLE :FIXUP :QWORD :DWORD :WORD :BYTE)"
|
||||
"((& (- val (>> val 10)) 7))")
|
||||
(#(497BDAC 2DD9FE8B 32B75C5F 42D83FFB 61C5C66D A9894789 DC78155D F264B103)
|
||||
"(:ALLOW-OTHER-KEYS :PRINT-WEEKDAY :PRINT-TIMEZONE :PRINT-MERIDIAN :PRINT-SECONDS :DATE-FIRST :STYLE :TIMEZONE)"
|
||||
"((& (+ (>> val 2) (>> val 7) (>> val 11)) 7))")
|
||||
|
|
@ -562,12 +578,6 @@
|
|||
(#(B327A56 4DBC97D6 6FAE4B5C 7911B186)
|
||||
"((:NEAREST . 0) (:ZERO . 3) (:POSITIVE-INFINITY . 1) (:NEGATIVE-INFINITY . 2))"
|
||||
"((& (>> val 13) 3))")
|
||||
(#(B445B28 27168950 5A0CB91B 60BC6EF6 80D0C591 8DECED5A 92FE1EC2 A245F357 AC841474 C17B6FA5 C6B4780F CF5ABDAB F28A2060)
|
||||
"(:JUMP-TABLE :FIXUP :COMPLEX-DOUBLE-FLOAT :COMPLEX-SINGLE-FLOAT :DOUBLE-FLOAT :SINGLE-FLOAT :CHARACTER :BASE-CHAR :OWORD :QWORD :DWORD :WORD :BYTE)"
|
||||
"((let ((tab #a((8) (unsigned-byte 8) 0 4 4 2 13 11 11 14)))
|
||||
(let ((b (& val #x7)))
|
||||
(let ((a (>> (<< val 5) 29)))
|
||||
(^ a (aref tab b))))))")
|
||||
(#(B445B28 2EF3F4BC 80D0C591 AC841474 C6B4780F)
|
||||
"(BASE-CHAR CHARACTER T SINGLE-FLOAT DOUBLE-FLOAT)"
|
||||
"((& (^ val (>> val 19)) 7))")
|
||||
|
|
@ -1098,16 +1108,6 @@
|
|||
(#(2664D2D2 80F378DD 95181988 99795732 9D771EE7 AD7DF3DC D2B54CD1)
|
||||
"(SAP-REF-8 SAP-REF-16 SAP-REF-32 SAP-REF-64 SIGNED-SAP-REF-64 SAP-REF-SAP SAP-REF-LISPOBJ)"
|
||||
"((& (^ val (>> val 31)) 7))")
|
||||
(#(27168950 5A0CB91B 60BC6EF6 7B3F916F 80D0C591 847A59C4 92FE1EC2 A245F357 AC841474 B6CE09C5 B7C3E8EA C17B6FA5 C3E68CAD
|
||||
CF5ABDAB F28A2060)
|
||||
"(:JUMP-TABLE :COMPLEX-DOUBLE-FLOAT :COMPLEX-SINGLE-FLOAT :DOUBLE-FLOAT :SINGLE-FLOAT :AVX512 :ZWORD :AVX2 :HWORD :SSE :OWORD :QWORD :DWORD :WORD :BYTE)"
|
||||
"((let ((tab #a((8) (unsigned-byte 8) 5 0 2 0 8 13 15 1)))
|
||||
(let ((b (& (>> val 5) #x7)))
|
||||
(let ((a (>> (<< val 5) 29)))
|
||||
(^ a (aref tab b))))))")
|
||||
(#(27168950 5A0CB91B 8DECED5A 92FE1EC2 C17B6FA5 CF5ABDAB F28A2060)
|
||||
"(:OWORD :JUMP-TABLE :FIXUP :QWORD :DWORD :WORD :BYTE)"
|
||||
"((& (^ val (>> val 20)) 7))")
|
||||
(#(27168950 833A59FE 92FE1EC2 CF5ABDAB F28A2060)
|
||||
"(:DO-NOT-SET :QWORD :DWORD :WORD :BYTE)"
|
||||
"((& (+ (>> val 1) (>> val 25)) 7))")
|
||||
|
|
@ -1705,88 +1705,5 @@
|
|||
(#(A49305EF D0241AE7 E55E7F8C EE9A5410)
|
||||
"(SB-PCL::%CLASS SB-PCL::%PARAMETER SB-PCL::%VARIABLE-REBINDING SPECIAL)"
|
||||
"((& (>> val 8) 3))")
|
||||
(#(11131BE7 168C60FD 2D45A4CF 2E16A006 32030766 3AA6053C 444AF531 47AA782C 5302EDCF 5CB9F779 6964D143 7058717C 83A1A47F
|
||||
86C51BD4 977E07FB B9D57393 CFFE5CF3)
|
||||
"#(((:TYPE VALUES-TYPE)) ((:TYPE FUN-DESIGNATOR-TYPE) (:TYPE FUN-TYPE)) ((:TYPE NUMERIC-UNION-TYPE)) ((:TYPE UNION-TYPE) (:TYPE INTERSECTION-TYPE) (:TYPE COMPOUND-TYPE)) ((:TYPE MEMBER-TYPE)) ((:TYPE ARRAY-TYPE)) ((:TYPE UNKNOWN-TYPE) (:TYPE HAIRY-TYPE)) ((:TYPE NEGATION-TYPE)) ((:TYPE CONSTANT-TYPE)) ((:TYPE CONS-TYPE)) ((:TYPE CHARACTER-SET-TYPE)) ((:TYPE SIMD-PACK-TYPE)) ((:TYPE ALIEN-TYPE-TYPE)))"
|
||||
"((let ((tab #a((16) (unsigned-byte 8) 0 13 0 0 9 0 13 1 0 15 0 4 0 17 0 0)))
|
||||
(let ((b (& val #xf)))
|
||||
(let ((a (>> val 28)))
|
||||
(^ a (aref tab b))))))")
|
||||
(#(11131BE7 168C60FD 2D45A4CF 2E16A006 3AA6053C 444AF531 5302EDCF 5CB9F779 6964D143 7058717C 83A1A47F 86C51BD4 977E07FB
|
||||
B9D57393 CFFE5CF3 D3774C34)
|
||||
"#(((:TYPE UNKNOWN-TYPE) (:TYPE HAIRY-TYPE) (:TYPE SIMD-PACK-TYPE) (:TYPE CHARACTER-SET-TYPE) (:TYPE MEMBER-TYPE) (:TYPE NUMERIC-UNION-TYPE)) ((:TYPE VALUES-TYPE) (:TYPE FUN-TYPE) (:TYPE FUN-DESIGNATOR-TYPE) (:TYPE ARGS-TYPE)) ((:TYPE CONS-TYPE)) ((:TYPE ARRAY-TYPE)) ((:TYPE UNION-TYPE) (:TYPE INTERSECTION-TYPE) (:TYPE COMPOUND-TYPE)) ((:TYPE NEGATION-TYPE)))"
|
||||
"((let ((tab #a((8) (unsigned-byte 8) 3 12 0 12 0 12 15 0)))
|
||||
(let ((b (& (>> val 6) #x7)))
|
||||
(let ((a (>> (<< val 5) 29)))
|
||||
(^ a (aref tab b))))))")
|
||||
(#(359CB801 4D28C61A 53351B33 A2DD0906 B9B79FF6)
|
||||
"(FUNCTION SB-IMPL::PREDICATE SB-IMPL::KEY SB-IMPL::TEST SB-IMPL::TEST-NOT)"
|
||||
"((& (^ (>> val 3) (>> val 6)) 7))")
|
||||
(#(11131BE7 168C60FD 2D45A4CF 2E16A006 32030766 3AA6053C 44273B23 444AF531 47AA782C 5302EDCF 538C4003 5595EEC3 58D40BEE
|
||||
5CB9F779 634EB941 646135D9 6964D143 7058717C 7CFF98EB 7F255BE9 83A1A47F 86C51BD4 90EC2354 977E07FB 99AE692E B9D57393
|
||||
CFFE5CF3 D3774C34 E8C239EF FC8EAFE7)
|
||||
"(UNDEFINED-CLASSOID BUILT-IN-CLASSOID CONDITION-CLASSOID STRUCTURE-CLASSOID STANDARD-CLASSOID STATIC-CLASSOID CLASSOID SIMD-PACK-TYPE CONSTANT-TYPE VALUES-TYPE FUN-TYPE FUN-DESIGNATOR-TYPE ARGS-TYPE CONS-TYPE NUMERIC-UNION-TYPE NEGATION-TYPE ALIEN-TYPE-TYPE NAMED-TYPE UNKNOWN-TYPE HAIRY-TYPE MEMBER-TYPE ARRAY-TYPE CHARACTER-SET-TYPE COMPOUND-TYPE UNION-TYPE INTERSECTION-TYPE CTYPE SB-C::LVAR SB-C::LAMBDA-VAR CONSTANT)"
|
||||
"((let ((tab #a((16) (unsigned-byte 8) 21 31 22 3 15 7 31 22 11 24 13 21 0 13 18 0)))
|
||||
(let ((b (& (>> val 9) #xf)))
|
||||
(let ((a (>> (<< val 7) 28)))
|
||||
(^ a (aref tab b))))))")
|
||||
(#(90D0AD8D A836E4F7 BE9D3FB8 D3F36C41)
|
||||
"(SB-VM::NEON-REG SB-VM::INT-NEON-REG SB-VM::SINGLE-NEON-REG SB-VM::DOUBLE-NEON-REG)"
|
||||
"((& (>> val 2) 3))")
|
||||
(#(1607B33C 380E1F3F 90D0AD8D A4EDA9A1 A836E4F7 BE9D3FB8 D3F36C41 FD00B976)
|
||||
"(SB-VM::COMPLEX-DOUBLE-REG SB-VM::SINGLE-NEON-REG SB-VM::DOUBLE-NEON-REG SB-VM::INT-NEON-REG SB-VM::NEON-REG SB-VM::COMPLEX-SINGLE-REG SB-VM::DOUBLE-REG SB-VM::SINGLE-REG)"
|
||||
"((& (- (>> val 2) (>> val 9)) 7))")
|
||||
(#(C 2E 34 36 38 3A 3C)
|
||||
"(26 30 29 28 27 23 6)"
|
||||
"((& (+ (>> val 1) (>> val 2) (>> val 4)) 7))")
|
||||
(#(6 8 A 16 2C)
|
||||
"(5 4 3 11 22)"
|
||||
"((let ((tab #a((4) (unsigned-byte 8) 2 3 6 0)))
|
||||
(let ((b (& (>> val 1) #x3)))
|
||||
(let ((a (>> (<< val 26) 30)))
|
||||
(^ a (aref tab b))))))")
|
||||
(#(6 8 A 18 2C)
|
||||
"(5 4 3 12 22)"
|
||||
"((let ((tab #a((4) (unsigned-byte 8) 0 2 1 4)))
|
||||
(let ((b (& (>> val 1) #x3)))
|
||||
(let ((a (>> (<< val 26) 30)))
|
||||
(^ a (aref tab b))))))")
|
||||
(#(1E 20 22 38 3A 3C)
|
||||
"(17 16 15 30 29 28)"
|
||||
"((let ((tab #a((4) (unsigned-byte 8) 0 7 2 1)))
|
||||
(let ((b (& (>> val 1) #x3)))
|
||||
(let ((a (>> (<< val 26) 30)))
|
||||
(^ a (aref tab b))))))")
|
||||
(#(8 E 10 16 2C)
|
||||
"(11 22 7 8 4)"
|
||||
"((let ((tab #a((4) (unsigned-byte 8) 0 0 6 2)))
|
||||
(let ((b (& (>> val 1) #x3)))
|
||||
(let ((a (>> (<< val 26) 30)))
|
||||
(^ a (aref tab b))))))")
|
||||
(#(0 2 4 24 26 28 2E 30)
|
||||
"(18 19 23 24 2 20 1 0)"
|
||||
"((let ((tab #a((4) (unsigned-byte 8) 7 0 1 7)))
|
||||
(+= val #x762d9085)
|
||||
(^= val (>> val 4))
|
||||
(let ((b (& val #x3)))
|
||||
(let ((a (>> (u32+ val (<< val 26)) 30)))
|
||||
(^ a (aref tab b))))))")
|
||||
(#(0 2 4 6 8 A E 10 12 14 16 18 1A 1C 1E 20 22 24 26 28 2A 2E 30 32 34 36 38 3A 3C 7A)
|
||||
"(61 4 3 10 7 8 9 5 14 13 12 11 26 25 24 23 16 17 15 29 30 28 27 21 20 2 19 18 0 1)"
|
||||
"((let ((tab #a((16) (unsigned-byte 8) 21 0 16 13 18 3 24 15 1 9 11 28 26 4 20 29)))
|
||||
(+= val #x2c45f2cb)
|
||||
(^= val (>> val 4))
|
||||
(let ((b (& val #xf)))
|
||||
(let ((a (>> (u32+ val (<< val 23)) 28)))
|
||||
(^ a (aref tab b))))))")
|
||||
(#(428DC20 B445B28 27168950 5A0CB91B 60BC6EF6 80D0C591 8DECED5A 92FE1EC2 A245F357 AC841474 C17B6FA5 C6B4780F CF5ABDAB F28A2060)
|
||||
"(:BYTE-ARRAY :JUMP-TABLE :FIXUP :COMPLEX-DOUBLE-FLOAT :COMPLEX-SINGLE-FLOAT :DOUBLE-FLOAT :SINGLE-FLOAT :CHARACTER :BASE-CHAR :OWORD :QWORD :DWORD :WORD :BYTE)"
|
||||
"((let ((tab #a((8) (unsigned-byte 8) 0 0 8 14 12 7 11 3)))
|
||||
(let ((b (& val #x7)))
|
||||
(let ((a (>> (<< val 5) 29)))
|
||||
(^ a (aref tab b))))))")
|
||||
(#(428DC20 27168950 5A0CB91B 8DECED5A 92FE1EC2 C17B6FA5 CF5ABDAB F28A2060)
|
||||
"(:OWORD :BYTE-ARRAY :JUMP-TABLE :FIXUP :QWORD :DWORD :WORD :BYTE)"
|
||||
"((& (- val (>> val 10)) 7))")
|
||||
)
|
||||
;; EOF
|
||||
|
|
|
|||
Loading…
Reference in a new issue