common-lisp/sbcl.sbcl
1
0
Fork 0
mirror of git://git.code.sf.net/p/sbcl/sbcl synced 2026-09-10 07:26:40 -04:00
Code Issues Actions 8 Packages Projects Releases Wiki Activity

build-all-cores

Browse source
This commit is contained in:
Douglas Katzman 2026-01-20 14:14:37 -05:00
parent 2e0b93ae5c
commit 9ffabf0a4d
4 changed files with 41 additions and 29 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
crossbuild-runner/Makefile
View file

@ -29,16 +29,16 @@ obj/xbuild/arm64-immobile-space/xc.core: $(DEPS1)
obj/xbuild/arm64-immobile-space.core: obj/xbuild/arm64-immobile-space/xc.core
$(SBCL) $(ARGS) arm64-immobile-space < $(SCRIPT2)
obj/xbuild/loongarch64/xc.core: $(DEPS1)
$(SBCL) $(ARGS) loongarch64 loongarch64 "(:UNIX :LINUX :ELF :64-BIT :LITTLE-ENDIAN :SB-THREAD)" < $(SCRIPT1)
obj/xbuild/loongarch.core: obj/xbuild/loongarch64/xc.core
$(SBCL) $(ARGS) loongarch64 < $(SCRIPT2)
obj/xbuild/mips/xc.core: $(DEPS1)
$(SBCL) $(ARGS) mips mips "(:UNIX :LINUX :ELF :OS-PROVIDES-CLOCK-GETTIME :LARGEFILE :LITTLE-ENDIAN)" < $(SCRIPT1)
obj/xbuild/mips.core: obj/xbuild/mips/xc.core
$(SBCL) $(ARGS) mips < $(SCRIPT2)
obj/xbuild/loongarch64/xc.core: $(DEPS1)
$(SBCL) $(ARGS) loongarch64 loongarch64 "(:UNIX :LINUX :ELF :OS-PROVIDES-CLOCK-GETTIME :64-BIT :LITTLE-ENDIAN :SB-THREAD)" < $(SCRIPT1)
obj/xbuild/loongarch64.core: obj/xbuild/loongarch64/xc.core
$(SBCL) $(ARGS) loongarch64 < $(SCRIPT2)
obj/xbuild/ppc/xc.core: $(DEPS1)
$(SBCL) $(ARGS) ppc ppc "(:UNIX :LINUX :ELF :OS-PROVIDES-CLOCK-GETTIME :BIG-ENDIAN)" < $(SCRIPT1)
obj/xbuild/ppc.core: obj/xbuild/ppc/xc.core

15
xperfecthash30.lisp-expr
View file

@ -267,6 +267,9 @@
(#(6FAF4E AA95D8F F14865E 17F08D68 18B18FFE)
"(REST FIRST CDR CAR AREF)"
"((& (- (>> val 1) (>> val 7)) 7))")
(#(6FC299 2D83FFB 35ED22C 8892768 15E7305A)
"(:ALLOW-OTHER-KEYS :UNSIGNED :COMPLEX :FLOAT :RATIONAL)"
"((& val 7))")
(#(784712 2D83FFB 36C8D9C 3FC5F0C 195BA73C 196F3AB0)
"(:ALLOW-OTHER-KEYS :FAST-MODE :ACCRUED-EXCEPTIONS :CURRENT-EXCEPTIONS :ROUNDING-MODE :TRAPS)"
"((& (- val (>> val 3)) 7))")
@ -1105,9 +1108,12 @@
(#(3C481C2 4528420 A3E03D5 10F360C2 11F36255 13D42188 15F368A1 17F36BC7)
"(FLOOR * ASH TRUNCATE / %NEGATE + -)"
"((& (- val (>> val 12)) 7))")
(#(3C481C2 4528420 10E6341F 10F360C2 137BB764 13D42188 15F368A1)
"(CEILING FLOOR TRUNCATE ABS ASH * /)"
"((& (+ (>> val 3) (>> val 14) (>> val 18)) 7))")
(#(3C481C2 4528420 10E6341F 10F360C2 11F36255 137BB764 13D42188 15F368A1 17F36BC7)
"(- + CEILING FLOOR TRUNCATE ABS ASH * /)"
"((let ((tab #a((8) (unsigned-byte 8) 0 12 2 2 0 3 7 5)))
(let ((b (& (>> val 6) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(3CD666D 8A18EE5 D96C390 10BCF1E4 1256235A 1362CBC8 15AD1E77 16AE7E65 16EC497E 18E49987 1C077216 1DA11FBF)
"(:ARG-PASS :SPECIFIED-SAVE :UNUSED :ALIAS :COMPONENT :CONSTANT :LOAD :SAVE-ONCE :SAVE :DEBUG-ENVIRONMENT :ENVIRONMENT :NORMAL)"
"((let ((tab #a((8) (unsigned-byte 8) 12 0 13 3 0 0 6 12)))
@ -1165,6 +1171,9 @@
(#(4528420 A3E03D5 10F360C2 11F36255 17F36BC7)
"(ASH * %NEGATE + -)"
"((& (+ (>> val 1) (>> val 6)) 7))")
(#(4528420 10F360C2 11F36255 137BB764 17F36BC7)
"(ABS ASH * - +)"
"((& (- val (>> val 1)) 7))")
(#(456475A 53C5D56 CDCC3EF 12383212 13880CF4)
"(&KEY &BODY &REST &AUX &OPTIONAL)"
"((& (+ val (>> val 8)) 7))")

15
xperfecthash61.lisp-expr
View file

@ -791,6 +791,9 @@
(#(235ED22C 2BCE7F62 72E2CBDA 75E7305A 80D0C591 AC841474)
"(REAL FLOAT DOUBLE-FLOAT SINGLE-FLOAT RATIONAL INTEGER)"
"((& (+ (>> val 5) (>> val 6)) 7))")
(#(235ED22C 42D83FFB 75E7305A A8892768 E06FC299)
"(:ALLOW-OTHER-KEYS :UNSIGNED :COMPLEX :FLOAT :RATIONAL)"
"((& val 7))")
(#(236A976D 3F90074C 42D83FFB 4C9563A8 71FB8EC1 7E1E0B08 B169B946 E940F22A)
"(:ALLOW-OTHER-KEYS :CONVENTION :STUB :VARARGS :ARG-TYPES :RESULT-TYPE :ALIGNMENT :BITS)"
"((& (>> val 10) 7))")
@ -1256,9 +1259,12 @@
(#(63C481C2 6A3E03D5 73D42188 A4528420 D0F360C2 D1F36255 D5F368A1 D7F36BC7)
"(FLOOR * ASH TRUNCATE / %NEGATE + -)"
"((& (- val (>> val 12)) 7))")
(#(63C481C2 73D42188 937BB764 A4528420 B0E6341F D0F360C2 D5F368A1)
"(CEILING FLOOR TRUNCATE ABS ASH * /)"
"((& (+ (>> val 1) (>> val 22) (>> val 28)) 7))")
(#(63C481C2 73D42188 937BB764 A4528420 B0E6341F D0F360C2 D1F36255 D5F368A1 D7F36BC7)
"(- + CEILING FLOOR TRUNCATE ABS ASH * /)"
"((let ((tab #a((8) (unsigned-byte 8) 0 12 2 2 0 3 7 5)))
(let ((b (& (>> val 6) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(65E06B8A 66E06D1D 67E06EB0 68E07043 69E071D6 6AE07369 6BE074FC 6CE0768F)
"#(:CR0 :CR1 :CR2 :CR3 :CR4 :CR5 :CR6 :CR7)"
"((& val 7))")
@ -1298,6 +1304,9 @@
(#(8BD63E3B A45D9F5E D1AAA153 D9E47BF0 E487643D F5B1443E)
"(%MAKE-LIST MAKE-ARRAY VECTOR-SUBSEQ SUBSEQ VECTOR LIST)"
"((& (- val (>> val 30)) 7))")
(#(937BB764 A4528420 D0F360C2 D1F36255 D7F36BC7)
"(ABS ASH * - +)"
"((& (- val (>> val 1)) 7))")
(#(940C9427 9D1675BD B5CAB0CC FA91B005)
"(:UNSAFE-DEFAULT :SAFE-DEFAULT :UNBOUND :TRAP)"
"((& (>> val 17) 3))")

30
xperfecthash63.lisp-expr
View file

@ -1003,6 +1003,9 @@
(#(235ED22C 2BCE7F62 72E2CBDA 75E7305A 80D0C591 AC841474)
"(REAL FLOAT DOUBLE-FLOAT SINGLE-FLOAT RATIONAL INTEGER)"
"((& (+ (>> val 5) (>> val 6)) 7))")
(#(235ED22C 42D83FFB 75E7305A A8892768 E06FC299)
"(:ALLOW-OTHER-KEYS :UNSIGNED :COMPLEX :FLOAT :RATIONAL)"
"((& val 7))")
(#(236A976D 3F90074C 42D83FFB 4C9563A8 71FB8EC1 7E1E0B08 B169B946 E940F22A)
"(:ALLOW-OTHER-KEYS :CONVENTION :STUB :VARARGS :ARG-TYPES :RESULT-TYPE :ALIGNMENT :BITS)"
"((& (>> val 10) 7))")
@ -1570,9 +1573,12 @@
(#(63C481C2 6A3E03D5 73D42188 A4528420 D0F360C2 D1F36255 D5F368A1 D7F36BC7)
"(FLOOR * ASH TRUNCATE / %NEGATE + -)"
"((& (- val (>> val 12)) 7))")
(#(63C481C2 73D42188 937BB764 A4528420 B0E6341F D0F360C2 D5F368A1)
"(CEILING FLOOR TRUNCATE ABS ASH * /)"
"((& (+ (>> val 1) (>> val 22) (>> val 28)) 7))")
(#(63C481C2 73D42188 937BB764 A4528420 B0E6341F D0F360C2 D1F36255 D5F368A1 D7F36BC7)
"(- + CEILING FLOOR TRUNCATE ABS ASH * /)"
"((let ((tab #a((8) (unsigned-byte 8) 0 12 2 2 0 3 7 5)))
(let ((b (& (>> val 6) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(6A3E03D5 73D42188 A4528420 D0F360C2 D1F36255 D5F368A1 D7F36BC7)
"(* ASH TRUNCATE / %NEGATE + -)"
"((& (- (>> val 6) (>> val 25)) 7))")
@ -1625,6 +1631,9 @@
(#(8BD63E3B A45D9F5E D1AAA153 D9E47BF0 E487643D F5B1443E)
"(%MAKE-LIST MAKE-ARRAY VECTOR-SUBSEQ SUBSEQ VECTOR LIST)"
"((& (- val (>> val 30)) 7))")
(#(937BB764 A4528420 D0F360C2 D1F36255 D7F36BC7)
"(ABS ASH * - +)"
"((& (- val (>> val 1)) 7))")
(#(940C9427 9D1675BD B5CAB0CC FA91B005)
"(:UNSAFE-DEFAULT :SAFE-DEFAULT :UNBOUND :TRAP)"
"((& (>> val 17) 3))")
@ -1652,20 +1661,5 @@
(#(A49305EF D0241AE7 E55E7F8C EE9A5410)
"(SB-PCL::%CLASS SB-PCL::%PARAMETER SB-PCL::%VARIABLE-REBINDING SPECIAL)"
"((& (>> val 8) 3))")
(#(8 E 10 16 18 26 28)
"(12 11 19 20 8 7 4)"
"((& (- (>> val 2) (>> val 5)) 7))")
(#(63C481C2 73D42188 937BB764 A4528420 B0E6341F D0F360C2 D1F36255 D5F368A1 D7F36BC7)
"(- + CEILING FLOOR TRUNCATE ABS ASH * /)"
"((let ((tab #a((8) (unsigned-byte 8) 0 12 2 2 0 3 7 5)))
(let ((b (& (>> val 6) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(937BB764 A4528420 D0F360C2 D1F36255 D7F36BC7)
"(ABS ASH * - +)"
"((& (- val (>> val 1)) 7))")
(#(235ED22C 42D83FFB 75E7305A A8892768 E06FC299)
"(:ALLOW-OTHER-KEYS :UNSIGNED :COMPLEX :FLOAT :RATIONAL)"
"((& val 7))")
)
;; EOF