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
sbcl.sbcl/xperfecthash63.lisp-expr

1970 lines
110 KiB
Plaintext
Raw Blame History

(
(#(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))))))")
(#(0 2 4 6 8 A E 10 12 14 16 18 1A 1C 1E 20 22 24 28 2A 2C 2E 7A)
"(61 4 3 10 7 8 9 5 14 13 12 11 23 22 21 20 18 17 2 16 15 0 1)"
"((let ((tab #a((16) (unsigned-byte 8) 0 13 1 7 13 7 21 15 16 9 22 17 21 0 18 22)))
(let ((b (& (>> val 1) #xf)))
(let ((a (>> (<< val 25) 28)))
(^ a (aref tab b))))))")
(#(0 2 4 1E 20 22 28 2A)
"(15 16 20 21 2 17 1 0)"
"((let ((tab #a((4) (unsigned-byte 8) 0 7 1 7)))
(+= val #xcafb35e5)
(^= val (>> val 4))
(let ((b (& (>> val 3) #x3)))
(let ((a (>> (u32+ val (<< val 29)) 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 32 34 36)
"(26 25 2 27 1 0)"
"((& (- (>> val 1) (>> val 3)) 7))")
(#(0 2 4 34 36)
"(26 2 27 1 0)"
"((& (+ (>> val 1) (>> val 5)) 7))")
(#(0 2 A C E 10 1E)
"(8 7 0 15 1 5 6)"
"((let ((tab #a((4) (unsigned-byte 8) 0 4 7 0)))
(let ((b (& (>> val 1) #x3)))
(let ((a (>> (<< val 27) 30)))
(^ a (aref tab b))))))")
(#(0 2 A 1A 1E)
"(5 15 1 13 0)"
"((let ((tab #a((4) (unsigned-byte 8) 2 0 0 7)))
(let ((b (& (>> val 1) #x3)))
(let ((a (>> (<< val 27) 30)))
(^ a (aref tab b))))))")
(#(0 4 5 C D)
"(NIL 13 12 4 5)"
"((& (- val (>> val 2)) 7))")
(#(0 4 8 C E 10 14 18 1C 38 3C)
"(30 0 14 4 28 8 12 2 6 10 7)"
"((let ((tab #a((8) (unsigned-byte 8) 1 8 0 8 5 0 0 5)))
(+= val #xda0af00d)
(^= val (>> val 4))
(let ((b (& val #x7)))
(let ((a (>> (u32+ val (<< val 25)) 29)))
(^ a (aref tab b))))))")
(#(0 4 8 1E 20 22 28 2A)
"(15 16 20 21 2 17 4 0)"
"((let ((tab #a((4) (unsigned-byte 8) 0 4 7 0)))
(+= val #x2ebae1b0)
(^= val (>> val 4))
(let ((b (& (>> val 4) #x3)))
(let ((a (>> (u32+ val (<< val 28)) 30)))
(^ a (aref tab b))))))")
(#(0 4 8 24 26 28 2E 30)
"(18 19 23 24 2 20 4 0)"
"((let ((tab #a((8) (unsigned-byte 8) 0 7 2 4 2 5 5 0)))
(+= val #xa4e87235)
(^= val (>> val 4))
(let ((b (& (>> val 1) #x7)))
(let ((a (>> (u32+ val (<< val 24)) 30)))
(^ a (aref tab b))))))")
(#(0 4 8 32 34 36)
"(26 25 2 27 4 0)"
"((let ((tab #a((4) (unsigned-byte 8) 0 7 3 0)))
(+= val #x3d1cc7a5)
(^= val (>> val 4))
(let ((b (& (>> val 1) #x3)))
(let ((a (>> (u32+ val (<< val 27)) 30)))
(^ a (aref tab b))))))")
(#(0 4 8 34 36)
"(26 2 27 4 0)"
"((let ((tab #a((4) (unsigned-byte 8) 0 0 2 6)))
(+= val #x14650a3e)
(^= val (>> val 4))
(let ((b (& (>> val 1) #x3)))
(let ((a (>> (u32+ val (<< val 26)) 30)))
(^ a (aref tab b))))))")
(#(0 58AA11D 33FB65F5 DE12C038)
"#(:OFFSET :POST-INDEX 0 :PRE-INDEX)"
"((& (>> val 2) 3))")
(#(0 732BDD9 6BC2D01D 841FB34E)
"(NIL :STRINGS :BOTH :SYMBOLS)"
"((& (>> val 25) 3))")
(#(0 B445B28 1A7E09AF 2EF3F4BC 4A8C210D 72E2CBDA 80D0C591 9BAC0C5C A8892768 AC841474 C6B4780F D0BE7277 E331CAB8 E48D4754)
"(NIL COMPLEX INTEGER MOD SINGLE-FLOAT DOUBLE-FLOAT SIGNED-BYTE UNSIGNED-BYTE FIXNUM BIT CHARACTER STANDARD-CHAR BASE-CHAR T)"
"((let ((tab #a((8) (unsigned-byte 8) 0 13 11 2 0 8 5 3)))
(let ((b (& (>> val 4) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(0 B445B28 1A7E09AF 2EF3F4BC 4A8C210D 72E2CBDA 80D0C591 9BAC0C5C A8892768 AC841474 C6B4780F D0BE7277 E331CAB8 E48D4754
FEDA4470)
"(NIL COMPLEX INTEGER MOD SINGLE-FLOAT DOUBLE-FLOAT SIGNED-BYTE UNSIGNED-BYTE FIXNUM BIT EXTENDED-CHAR CHARACTER STANDARD-CHAR BASE-CHAR T)"
"((let ((tab #a((8) (unsigned-byte 8) 4 15 5 5 0 0 12 13)))
(let ((b (& (>> val 3) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(0 B445B28 C6B4780F D0F360C2)
"(NIL BASE-CHAR CHARACTER *)"
"((& (>> val 12) 3))")
(#(0 BCB074C B9B79FF6 D6D95212)
"(:SPECIAL-FORM :MACRO :FUNCTION NIL)"
"((& (>> val 1) 3))")
(#(0 120FC1D0 2C444648 488BF057 97EE124C AD4575D9 EBD01872)
"(:VERSION :TYPE :NAME :DIRECTORY :DEVICE :HOST NIL)"
"((& (+ (>> val 5) (>> val 12)) 7))")
(#(0 1336F1AC 691ED00E 7CF43650 A1C5FD66)
"(:FIXED :KNOWN-RETURN :LOCAL-CALL :FULL-CALL NIL)"
"((& (^ (>> val 1) (>> val 12)) 7))")
(#(0 16124E24 A3BC72D2 F1B13DF2)
"(NIL :FAIL :DEFER :LISP)"
"((& (>> val 4) 3))")
(#(0 1C51B03E 39F613BF 8B8666B5)
"(NIL :INHERITED :EXTERNAL :INTERNAL)"
"((& val 3))")
(#(0 20DD4ACE 39B7D934 CBAC3F17 D8915102 DDB42CAD DFC40BAC F522715E)
"(NIL :SUPERSEDE :APPEND :OVERWRITE :RENAME-AND-DELETE :RENAME :NEW-VERSION :ERROR)"
"((& (+ (>> val 0) (>> val 8) (>> val 15)) 7))")
(#(0 20DD4ACE 39B7D934 CBAC3F17 D8915102 DFC40BAC F522715E)
"(:APPEND :SUPERSEDE :RENAME-AND-DELETE :RENAME NIL :ERROR :NEW-VERSION)"
"((& (- val (>> val 24)) 7))")
(#(0 235ED22C 2BCE7F62 4A8C210D 56B428A2 72E2CBDA 75E7305A 80D0C591 9BAC0C5C A8892768 AC841474 E48D4754)
"(RATIONAL INTEGER EQL FLOAT COMPLEX REAL NIL DOUBLE-FLOAT SINGLE-FLOAT MOD SIGNED-BYTE UNSIGNED-BYTE)"
"((let ((tab #a((8) (unsigned-byte 8) 8 8 0 2 0 15 5 0)))
(let ((b (& (>> val 5) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(0 235ED22C 72E2CBDA 75E7305A)
"(NIL FLOAT RATIONAL INTEGER)"
"((& (>> val 23) 3))")
(#(0 26FE04AB 4D28C61A 4D7290B0 4EBCAB16 A2B0ECD5 B6FE7D1C B9B79FF6 D750C880 E331AF48)
"(SB-WALKER::CALL LAMBDA SET NIL QUOTE RETURN SB-WALKER::EFFECT SB-WALKER::TEST FUNCTION EVAL)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 11 0 0 13 1 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(0 27168950 92FE1EC2 CF5ABDAB F28A2060)
"(:BYTE :WORD :DWORD :QWORD NIL)"
"((& (+ (>> val 1) (>> val 25)) 7))")
(#(0 2AFFE954 35870C8A C9EACDAD)
"(:UNSPECIFIC :WILD :NEWEST NIL)"
"((& (>> val 2) 3))")
(#(0 2BCE7F62 4A8C210D 56B428A2 80D0C591 9BAC0C5C A8892768 AC841474 E48D4754)
"(EQL COMPLEX REAL NIL DOUBLE-FLOAT SINGLE-FLOAT MOD SIGNED-BYTE UNSIGNED-BYTE)"
"((let ((tab #a((8) (unsigned-byte 8) 3 12 0 0 0 2 0 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(0 2C62CDF1 2FBB375F 57DA1CEC 7E1E0B08 EA6D3871)
"(:RESULT-TYPES NIL :CONDITIONAL :ARG-TYPES :ARG-CHECK :GUARD)"
"((& (+ (>> val 6) (>> val 14)) 7))")
(#(0 2C62CDF1 2FBB375F 7E1E0B08 EA6D3871)
"(:RESULT-TYPES NIL :ARG-TYPES :ARG-CHECK :GUARD)"
"((& (- (>> val 2) (>> val 26)) 7))")
(#(0 2DF0AB1F 860D0EEC 8B8666B5 CB5B4BC6 EBFEA11D)
"(:MORE :CLEANUP :TOPLEVEL :EXTERNAL :OPTIONAL NIL)"
"((& (+ val (>> val 28)) 7))")
(#(0 2EF3F4BC 54624023 B6FE7D1C)
"(SB-C::INITIAL-UNUSED T SET NIL)"
"((& (>> val 4) 3))")
(#(0 2EF3F4BC 75AAA551 87F1D96D D0F360C2 F714A2A1)
"(NIL EXTENDED-SEQUENCE FUNCALLABLE-INSTANCE INSTANCE * T)"
"((& (^ val (>> val 21)) 7))")
(#(0 2EF3F4BC B6CE09C5 C99FDFD4 E9FE1D98)
"(:AVX512 :COMPUTE-ONLY :FORCE-TO-STACK NIL T)"
"((& (+ val (>> val 5)) 7))")
(#(0 2EF3F4BC C99FDFD4 E9FE1D98)
"(:COMPUTE-ONLY :FORCE-TO-STACK NIL T)"
"((& (>> val 2) 3))")
(#(0 31DAB32E 4790D6FC 573C9675 EBFEA11D)
"(:DELETED :INITIAL :COMPLEX-TOPLEVEL :TOPLEVEL NIL)"
"((& (+ val (>> val 2)) 7))")
(#(0 327D4631 87F1D96D A0C9ABA9 CC4FD31D)
"(NIL :FORTHCOMING-DEFCLASS-TYPE :INSTANCE :DEFINED :PRIMITIVE)"
"((& (- val (>> val 11)) 7))")
(#(0 359CB801 5DAB18D0 625827B9 D2821F1C E391E233)
"(:NAMED :PREDICATE :COPIER :CONSTRUCTOR :CONC-NAME NIL)"
"((& (+ val (>> val 23)) 7))")
(#(0 53351B33 5B794797 9AD3464D DAEC1DD5)
"(:KEY-OR-VALUE :KEY-AND-VALUE :VALUE :KEY NIL)"
"((& (^ val (>> val 12)) 7))")
(#(0 54D53330 56B428A2 DC33E6FC EC9FE1B2)
"(NIL EQUALP EQUAL EQL EQ)"
"((& (+ (>> val 1) (>> val 8)) 7))")
(#(0 6BC2D01D CFA5803C EB45269C)
"(NIL :HEAD :TAIL :BOTH)"
"((& (>> val 15) 3))")
(#(0 711B9D42 71DECFF1 AB57C9E9)
"(:AUTO :IMMOBILE :DYNAMIC NIL)"
"((& (>> val 18) 3))")
(#(0 991CAE6F 9E1CB64E C60DEABC D10DFC0D D5FEF962 D6D10A2B DFFF0920)
"(:|2D| NIL :|2S| :|4S| :|8H| :|4H| :|16B| :|8B|)"
"((& (^ val (>> val 31)) 7))")
(#(0 B1478F0B B31CDF30 D506BD28)
"(NIL NOTINLINE MAYBE-INLINE INLINE)"
"((& (- val (>> val 4)) 3))")
(#(0 C49039A2 DB6D6FD7 E487643D F5B1443E)
"(SIMPLE-VECTOR VECTOR CONS LIST NIL)"
"((& (+ (>> val 4) (>> val 19)) 7))")
(#(2 4 8 10 20 40 80)
"(64 32 16 8 4 2 1)"
"((& (+ (>> val 1) (>> val 2) (>> val 4)) 7))")
(#(2 4 10 20 80)
"(64 16 8 2 1)"
"((& (+ (>> val 1) (>> val 2) (>> val 6)) 7))")
(#(2 6 A C 16)
"(1 6 3 11 5)"
"((& (^ (>> val 2) (>> val 4)) 7))")
(#(2 6 A C 18)
"(1 6 3 12 5)"
"((& (+ (>> val 2) (>> val 3) (>> val 4)) 7))")
(#(2 6 A 16 26)
"(1 5 3 11 19)"
"((& (^ (>> val 2) (>> val 4)) 7))")
(#(2 6 A 16 2C)
"(1 5 3 11 22)"
"((let ((tab #a((4) (unsigned-byte 8) 0 6 2 0)))
(+= val #xe705d0f4)
(^= val (>> val 4))
(let ((b (& (>> val 2) #x3)))
(let ((a (>> (u32+ val (<< val 21)) 30)))
(^ a (aref tab b))))))")
(#(2 6 A 18 26)
"(1 5 3 12 19)"
"((let ((tab #a((4) (unsigned-byte 8) 2 1 0 5)))
(+= val #xe705d0f4)
(^= val (>> val 4))
(let ((b (& (>> val 2) #x3)))
(let ((a (>> (u32+ val (<< val 21)) 30)))
(^ a (aref tab b))))))")
(#(2 6 A 18 2C)
"(1 5 3 12 22)"
"((let ((tab #a((4) (unsigned-byte 8) 3 1 0 4)))
(let ((b (& (>> val 2) #x3)))
(let ((a (>> (<< val 30) 30)))
(^ a (aref tab b))))))")
(#(2 A E 10 12 16 18 1A 1C 2C)
"(14 13 12 11 22 9 8 7 1 5)"
"((let ((tab #a((8) (unsigned-byte 8) 5 0 0 11 11 5 0 0)))
(let ((b (& (>> val 1) #x7)))
(let ((a (>> (<< val 26) 29)))
(^ a (aref tab b))))))")
(#(4 6 A 10 18 1C)
"(12 3 2 14 5 8)"
"((let ((tab #a((4) (unsigned-byte 8) 7 0 0 2)))
(let ((b (& (>> val 1) #x3)))
(let ((a (>> (<< val 27) 30)))
(^ a (aref tab b))))))")
(#(4 6 A 18 1C)
"(12 3 2 14 5)"
"((let ((tab #a((4) (unsigned-byte 8) 7 0 0 2)))
(let ((b (& (>> val 1) #x3)))
(let ((a (>> (<< val 27) 30)))
(^ a (aref tab b))))))")
(#(4 6 C 10 18 1C)
"(12 3 2 14 6 8)"
"((let ((tab #a((4) (unsigned-byte 8) 7 0 0 2)))
(let ((b (& (>> val 1) #x3)))
(let ((a (>> (<< val 27) 30)))
(^ a (aref tab b))))))")
(#(4 6 10 12 18 1C)
"(12 3 2 14 8 9)"
"((let ((tab #a((4) (unsigned-byte 8) 7 0 0 1)))
(let ((b (& (>> val 1) #x3)))
(let ((a (>> (<< val 27) 30)))
(^ a (aref tab b))))))")
(#(4 6 10 18 1C)
"(12 3 2 14 8)"
"((let ((tab #a((4) (unsigned-byte 8) 3 0 4 1)))
(let ((b (& (>> val 2) #x3)))
(let ((a (>> (<< val 30) 30)))
(^ a (aref tab b))))))")
(#(6 8 A 16 26)
"(5 4 3 11 19)"
"((let ((tab #a((4) (unsigned-byte 8) 3 4 0 0)))
(let ((b (& (>> val 1) #x3)))
(let ((a (>> (<< val 26) 30)))
(^ a (aref tab b))))))")
(#(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 26)
"(5 4 3 12 19)"
"((let ((tab #a((4) (unsigned-byte 8) 0 2 7 0)))
(let ((b (>> (<< val 26) 30)))
(let ((a (& (>> val 1) #x3)))
(^ 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))))))")
(#(8 E 10 16 26)
"(11 19 7 8 4)"
"((let ((tab #a((4) (unsigned-byte 8) 0 2 7 0)))
(let ((b (>> (<< val 26) 30)))
(let ((a (& (>> val 1) #x3)))
(^ 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))))))")
(#(A E 10 16 26)
"(11 19 7 8 5)"
"((let ((tab #a((4) (unsigned-byte 8) 2 4 0 0)))
(let ((b (& (>> val 1) #x3)))
(let ((a (>> (<< val 26) 30)))
(^ a (aref tab b))))))")
(#(A E 10 16 2C)
"(11 22 7 8 5)"
"((let ((tab #a((4) (unsigned-byte 8) 2 2 6 0)))
(let ((b (& (>> val 1) #x3)))
(let ((a (>> (<< val 26) 30)))
(^ a (aref tab b))))))")
(#(C 2E 34 36 38 3A 3C)
"(26 30 29 28 27 23 6)"
"((& (+ (>> val 1) (>> val 2) (>> val 4)) 7))")
(#(14 16 18 1A 1C 1E 20 22 24 26 28 2C)
"(10 11 12 13 14 15 16 17 18 19 20 22)"
"((let ((tab #a((8) (unsigned-byte 8) 12 13 0 5 0 8 5 9)))
(let ((b (& (>> val 1) #x7)))
(let ((a (>> (<< val 26) 29)))
(^ a (aref tab b))))))")
(#(14 16 18 1A 1C 1E 20 22 26 28 2C)
"(10 11 12 13 14 15 16 17 19 20 22)"
"((let ((tab #a((8) (unsigned-byte 8) 12 13 8 0 0 4 5 2)))
(let ((b (& (>> val 1) #x7)))
(let ((a (>> (<< val 26) 29)))
(^ 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))))))")
(#(1E 20 22 42 44 46)
"(17 16 15 35 34 33)"
"((let ((tab #a((4) (unsigned-byte 8) 3 4 0 0)))
(let ((b (>> (<< val 25) 30)))
(let ((a (& (>> val 1) #x3)))
(^ a (aref tab b))))))")
(#(24 26 28 48 4A 4C)
"(20 19 18 38 37 36)"
"((let ((tab #a((4) (unsigned-byte 8) 0 7 2 5)))
(let ((b (& (>> val 1) #x3)))
(let ((a (>> (<< val 25) 30)))
(^ a (aref tab b))))))")
(#(2A 2C 2E 4E 50 52)
"(23 22 21 41 40 39)"
"((let ((tab #a((4) (unsigned-byte 8) 7 0 5 2)))
(let ((b (& (>> val 1) #x3)))
(let ((a (>> (<< val 25) 30)))
(^ a (aref tab b))))))")
(#(C8 CA CC CE 1E0 1E4 1E6)
"(243 242 240 103 102 101 100)"
"((& (^ (>> val 1) (>> val 4)) 7))")
(#(112 11A 122 12A 132 13A 142 14A 152 15A 162 16A 172 17A 182 18A 192 19A 1A2 1AA 1B2 1BA 1C2)
"(137 221 217 205 201 197 193 189 185 181 177 173 169 165 161 157 153 149 145 141 213 209 225)"
"((let ((tab #a((16) (unsigned-byte 8) 0 24 0 13 0 13 0 13 1 21 16 22 16 18 7 21)))
(let ((b (& (>> val 3) #xf)))
(let ((a (>> (<< val 24) 28)))
(^ a (aref tab b))))))")
(#(112 11A 122 12A 132 13A 142 14A 152 15A 162 16A 172 17A 182 18A 192 19A 1A2 1AA 1B2 1BA 1C2 1CA)
"(137 221 217 205 201 197 193 189 185 181 177 173 169 165 161 157 153 149 145 141 213 209 229 225)"
"((let ((tab #a((16) (unsigned-byte 8) 31 24 0 13 0 13 0 13 1 12 16 22 16 18 21 22)))
(let ((b (& (>> val 3) #xf)))
(let ((a (>> (<< val 24) 28)))
(^ a (aref tab b))))))")
(#(112 162 16A 172 192 19A 1AA 1B2)
"(217 205 201 185 181 177 213 137)"
"((let ((tab #a((4) (unsigned-byte 8) 0 7 7 0)))
(+= val #x281c4049)
(^= val (>> val 4))
(let ((b (& (>> val 3) #x3)))
(let ((a (>> (u32+ val (<< val 25)) 30)))
(^ a (aref tab b))))))")
(#(11A 122 12A 13A 14A 15A 172 17A 182 18A 19A 1C2)
"(141 225 145 149 157 165 173 185 189 193 197 205)"
"((let ((tab #a((8) (unsigned-byte 8) 12 5 0 0 4 2 5 8)))
(let ((b (& (>> val 3) #x7)))
(let ((a (>> (<< val 24) 29)))
(^ a (aref tab b))))))")
(#(11A 122 12A 13A 14A 15A 172 17A 182 18A 19A 1C2 1CA)
"(141 225 229 145 149 157 165 173 185 189 193 197 205)"
"((let ((tab #a((8) (unsigned-byte 8) 13 0 0 8 4 1 4 0)))
(let ((b (& (>> val 3) #x7)))
(let ((a (>> (<< val 24) 29)))
(^ a (aref tab b))))))")
(#(27C 2A8 37C 3A8)
"(318 446 340 468)"
"((& (>> val 7) 3))")
(#(A51 3C51 3F51 5B51 7B51)
"(#\\? #\\{ #\\[ #\\< #\\Newline)"
"((let ((tab #a((4) (unsigned-byte 8) 5 0 0 0)))
(let ((b (& (>> val 8) #x3)))
(let ((a (>> (<< val 17) 30)))
(^ a (aref tab b))))))")
(#(2000 4000 8000 C000 10000 14000 18000)
"(4096 40960 49152 32768 24576 16384 8192)"
"((& (>> val 14) 7))")
(#(2351 2751 2B51 2C51 2D51 3A51 4051 5651 7651)
"(#\\@ #\\: #\\, #\\' #\\# #\\V #\\v #\\- #\\+)"
"((let ((tab #a((8) (unsigned-byte 8) 5 0 0 12 4 0 0 0)))
(+= val #x9f330c7b)
(^= val (>> val 4))
(let ((b (& (>> val 8) #x7)))
(let ((a (>> (u32+ val (<< val 15)) 29)))
(^ a (aref tab b))))))")
(#(2551 2651 2851 2951 3B51 3E51 4951 5451 5F51 7C51 7E51)
"#(#\\I #\\T #\\% #\\& #\\| #\\_ #\\( #\\) #\\; #\\> #\\~)"
"((let ((tab #a((8) (unsigned-byte 8) 11 4 0 2 13 7 0 1)))
(let ((b (& (>> val 8) #x7)))
(let ((a (>> (<< val 17) 29)))
(^ a (aref tab b))))))")
(#(4451 4551 4651 4C51 5251 5351)
"(#\\R #\\L #\\D #\\F #\\S #\\E)"
"((let ((tab #a((4) (unsigned-byte 8) 4 3 0 3)))
(let ((b (& (>> val 8) #x3)))
(let ((a (>> (<< val 19) 30)))
(^ a (aref tab b))))))")
(#(1B00E 1B420 1B440 1B442 1B9D0 1BD04 1BD06)
"(55303 56963 56962 56552 55841 55840 55824)"
"((let ((tab #a((4) (unsigned-byte 8) 7 7 0 2)))
(+= val #x66e9695)
(+= val (<< val 8))
(^= val (>> val 4))
(let ((b (& val #x3)))
(let ((a (>> (u32+ val (<< val 14)) 30)))
(^ a (aref tab b))))))")
(#(7FD94 39750D5C 42D83FFB 5F84C345 72E2CBDA EBF09BC1)
"(:ALLOW-OTHER-KEYS :Y-TYPE :X-TYPE :SAME-LEAF-NOT-COMPLEX :INTEGER :COMPLEX-P)"
"((& (- (>> val 4) (>> val 12)) 7))")
(#(1DCB99 10CFDD4F 78B2EAC1 EA4AD16E)
"(SB-FORMAT::TOKENIZE-CONTROL-STRING SB-ALIEN::COERCE-TO-INTERPRETED-FUNCTION VALUES-SPECIFIER-TYPE CTYPE-OF)"
"((& (>> val 22) 3))")
(#(784712 36C8D9C 395BA73C 42D83FFB 43FC5F0C B96F3AB0)
"(:ALLOW-OTHER-KEYS :FAST-MODE :ACCRUED-EXCEPTIONS :CURRENT-EXCEPTIONS :ROUNDING-MODE :TRAPS)"
"((& (- val (>> val 3)) 7))")
(#(88A33D 7DB47BF 42D83FFB 6D9F0E46 781E162D 9C219293 D04FDC4F FA4BD0D1)
"(:ALLOW-OTHER-KEYS :DISPLACED-INDEX-OFFSET :DISPLACED-TO :FILL-POINTER :ADJUSTABLE :INITIAL-CONTENTS :INITIAL-ELEMENT :ELEMENT-TYPE)"
"((& (+ val (>> val 14)) 7))")
(#(88A33D 7DB47BF 42D83FFB 6D9F0E46 9C219293 D04FDC4F FA4BD0D1)
"(:ALLOW-OTHER-KEYS :DISPLACED-INDEX-OFFSET :DISPLACED-TO :FILL-POINTER :INITIAL-CONTENTS :INITIAL-ELEMENT :ELEMENT-TYPE)"
"((& (+ val (>> val 8)) 7))")
(#(B13785 A0FCA41 2EF3F4BC 4D28C61A 5256235A 5411B855 5CB86B05 6E999239 831B55FB)
"(:NOT :AND :OR :SAME-AS :TEST :NEGATIVE :POSITIVE :CONSTANT T)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 12 2 3 7 5 2)))
(let ((b (& (>> val 13) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(EAAC33 42D83FFB 598F2A0D A82A6565 B260D105 CAAC2B7F CB631293 D9ADB46A F91307EE)
"(:ALLOW-OTHER-KEYS :VALUE-SOURCE-FORMS :LOCAL-POLICY :POST-BINDING-LEXENV :NOTE-LEXICAL-BINDINGS :DEBUG-NAME :SOURCE-NAME :AUX-VALS :AUX-VARS)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 0 0 0 5 9 4)))
(let ((b (& val #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(EAAC33 42D83FFB 6DE88D2A BBF9B8CE CB631293)
"(:ALLOW-OTHER-KEYS :FTYPE :MAYBE-ADD-DEBUG-CATCH :DEBUG-NAME :SOURCE-NAME)"
"((& (- val (>> val 30)) 7))")
(#(11242EA 9E7E496 C8B4E43 1ED1FDF2 5B5DB13A 70A5F7E1 8EC3EAC9 9F4BDEE8 BC805E5B DC58D005)
"(SB-C:MULTIPLE-CALL SB-C:MULTIPLE-CALL-LOCAL SB-C:MULTIPLE-CALL-NAMED SB-C:STATIC-MULTIPLE-CALL-NAMED SB-C:MULTIPLE-CALL-VARIABLE SB-C:PUSH-VALUES VALUES-LIST SB-C::REVERSE-VALUES-LIST SB-C:%MORE-ARG-VALUES UNALIGNED-DX-CONS)"
"((let ((tab #a((8) (unsigned-byte 8) 8 13 2 0 2 3 5 3)))
(let ((b (& (>> val 11) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(13913B1 24D3B50 59DB420 805A8CE D64C851 207E1321 26568C99 2870F40D 2B465CCD 2CC89B6A 3603EBBE 3D35266E 42D83FFB 42E64121
46050970 49C05C00 57C2457C 5A355FA0 665871AE 7566B287 772C8C38 7B50A359 7E89C88A 81BF9BA5 8B32A898 8F463A15 9BD8B4B6
9D753C32 9E88666C 9EDCE097 9F1704E1 A00DFCD7 A7EE2BA1 AD4575D9 AEDCFD06 B11EF72D B256F00B B71AFB68 D088DA49 D64A65E2
DB5C8A6A DDF478CA E57CFC3F E6B647A0 F087745E F5306542 F8AA3557 FA4BD0D1)
"(:ALLOW-OTHER-KEYS :FORM-START-CHAR-POS :FORM-START-BYTE-POS :LAST-NEWLINE :NEWLINES :OBSERVER :FILE-POSITION :OUTPUT-BYTES :REPLACEMENT :CHAR-SIZE :EXTERNAL-FORMAT :PATHNAME :TIMEOUT :HANDLER :OUTPUT-QUEUE :OBUF :EOF-FORCED-P :IBUF :INSTEAD :SERVE-EVENTS :LISTEN :OUTPUT-COLUMN :SYNCHRONIZE-OUTPUT :BUFFERING :FD-TYPE :FD :ELEMENT-MODE :ELEMENT-TYPE :ELEMENT-SIZE :DELETE-ORIGINAL :ORIGINAL :FILE :NAME :INPUT-CHAR-POS :MISC :SOUT :BOUT :COUT :N-BIN :BIN :IN :IN-INDEX :CHAR-BUFFER-START :CHAR-BUFFER-BYTE-POSITION-START :CHAR-BUFFER-BYTE-POSITION :CHAR-BUFFER-BYTE-POSITION-AT :CIN-BUFFER :IN-BUFFER)"
"((let ((tab #a((32) (unsigned-byte 8) 51 0 16 0 9 60 19 0 51 26 0 0 0 28 51 34 59 22 22 36 36 9 0 0 49 22 0 41 61 10 0 59)))
(let ((b (& (>> val 9) #x1f)))
(let ((a (>> (<< val 9) 27)))
(^ a (aref tab b))))))")
(#(15115EA 805D985 DBAFDA3 132E85C2 26DFCD3D 2C62CDF1 2FBB375F 2FCB0B8A 4EBA358E 4FA1D6C1 57DA1CEC 59F6CB0B 60D621C0 68E4C2C2
7A99ABFA 7B44F7BA 7E1E0B08 7EC15774 7F318E5B 9D748C83 A5D2FA71 D7126502 DAEA59DD E4157BFC F2F895BA FABEE259)
"(:CHECK-TYPE :GC-BARRIER :OPTIONAL-RESULTS :SAVE-P :POLICY :GUARD :TRANSLATE :RESULT-TYPES :ARG-TYPES :NOTE :NODE-VAR :MOVE-ARGS :RESULT-REFS :ARG-REFS :VOP-VAR :VARIANT-COST :VARIANT-VARS :VARIANT :IGNORE :INFO :BEFORE-LOAD :GENERATOR :TEMPORARY :CONDITIONAL :RESULTS :ARGS)"
"((let ((tab #a((16) (unsigned-byte 8) 21 0 0 0 14 31 24 15 26 0 0 0 18 11 3 31)))
(let ((b (& (>> val 1) #xf)))
(let ((a (>> (<< val 7) 28)))
(^ a (aref tab b))))))")
(#(15115EA 805D985 132E85C2 26DFCD3D 2C62CDF1 2FBB375F 2FCB0B8A 3BAA5C56 3CA49203 42D83FFB 4EBA358E 4FA1D6C1 68E4C2C2 7A99ABFA
7A9BD84A 7E1E0B08 7EC15774 9D748C83 A5D2FA71 AD4575D9 B08E958D B58649C9 BDD1B60F C4297528 CFADF401 D7126502 DA5197C7
ED5791F8 F682E177 FABEE259 FC06EE2A)
"(:ALLOW-OTHER-KEYS :CHECK-TYPE :GC-BARRIER :BEFORE-LOAD :MOVE-ARGS :SAVE-P :LTN-POLICY :TRANSLATE :NOTE :INFO-ARGS :NODE-VAR :VOP-VAR :VARIANT-VARS :VARIANT :BODY :COST :GUARD :RESULT-TYPES :ARG-TYPES :CONDITIONAL-P :IGNORES :OPTIONAL-RESULTS :OPERANDS :MORE-RESULTS :MORE-ARGS :TEMPS :RESULTS :ARGS :INHERITS :NAME :SOURCE-LOCATION)"
"((let ((tab #a((16) (unsigned-byte 8) 1 16 0 13 31 31 31 26 31 0 24 0 0 21 9 16)))
(let ((b (& (>> val 12) #xf)))
(let ((a (>> (<< val 7) 28)))
(^ a (aref tab b))))))")
(#(24D3B50 59DB420 805A8CE D64C851 207E1321 26568C99 2870F40D 2B465CCD 2CC89B6A 3603EBBE 3D35266E 42D83FFB 42E64121 46050970
49C05C00 57C2457C 5A355FA0 665871AE 772C8C38 7B50A359 7E89C88A 81BF9BA5 8B32A898 8F463A15 9BD8B4B6 9D753C32 9E88666C
9EDCE097 9F1704E1 A7EE2BA1 AD4575D9 AEDCFD06 B11EF72D B256F00B D088DA49 D64A65E2 DB5C8A6A DDF478CA E6B647A0 F087745E
F5306542 F8AA3557 FA4BD0D1)
"(:ALLOW-OTHER-KEYS :FILE-POSITION :OUTPUT-BYTES :REPLACEMENT :CHAR-SIZE :EXTERNAL-FORMAT :PATHNAME :TIMEOUT :HANDLER :OUTPUT-QUEUE :OBUF :EOF-FORCED-P :IBUF :INSTEAD :SERVE-EVENTS :LISTEN :OUTPUT-COLUMN :SYNCHRONIZE-OUTPUT :BUFFERING :FD-TYPE :FD :ELEMENT-MODE :ELEMENT-TYPE :ELEMENT-SIZE :DELETE-ORIGINAL :ORIGINAL :FILE :NAME :INPUT-CHAR-POS :MISC :SOUT :BOUT :COUT :N-BIN :BIN :IN :IN-INDEX :CHAR-BUFFER-START :CHAR-BUFFER-BYTE-POSITION-START :CHAR-BUFFER-BYTE-POSITION :CHAR-BUFFER-BYTE-POSITION-AT :CIN-BUFFER :IN-BUFFER)"
"((let ((tab #a((32) (unsigned-byte 8) 19 0 9 28 0 0 0 0 9 12 9 51 36 0 20 9 51 0 33 0 9 0 55 0 12 50 63 0 0 0 0 0)))
(let ((b (& (>> val 7) #x1f)))
(let ((a (>> (<< val 9) 27)))
(^ a (aref tab b))))))")
(#(2CF0EF9 2B465CCD 42D83FFB 4C85B539 4CEAB9AF 62186BB2 65324C60 65AA3342 CA788DDA D9DC5A17)
"(:ALLOW-OTHER-KEYS :EMIT-CFASL :ENTRY-POINTS :BLOCK-COMPILE :TRACE-FILE :PROGRESS :EXTERNAL-FORMAT :PRINT :VERBOSE :OUTPUT-FILE)"
"((let ((tab #a((8) (unsigned-byte 8) 8 13 2 0 3 7 2 5)))
(let ((b (& (>> val 7) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(2F01E50 468BDC1 1011FF64 3DF9BEAB 5019F8A6 8AC96829 D4A7D2E2 DAAFF766 FA9B170B)
"(SB-C:MOVE SB-VM::DOUBLE-MOVE SB-VM::SINGLE-MOVE SB-VM::WORD-MOVE SB-VM::MOVE-TO-WORD/FIXNUM SB-VM::CHARACTER-MOVE SB-VM::MOVE-FROM-CHARACTER SB-VM::MOVE-TO-CHARACTER SB-VM::SAP-MOVE)"
"((let ((tab #a((8) (unsigned-byte 8) 8 0 5 0 5 0 0 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(32D8760 254997EE 3B689448 60513032 85B21D28 A91FE7EE B2132A00 D78EA1F2 E550DE62 F4AE2EDF)
"(SB-VM::FAST--/FIXNUM=>FIXNUM SB-VM::FAST-+/FIXNUM=>FIXNUM SB-VM::FAST--/SIGNED=>SIGNED SB-VM::FAST-+/SIGNED=>SIGNED SB-VM::FAST---C/FIXNUM=>FIXNUM SB-VM::FAST-+-C/FIXNUM=>FIXNUM SB-VM::FAST---C/SIGNED=>SIGNED SB-VM::FAST-+-C/SIGNED=>SIGNED SB-VM::FAST-NEGATE/FIXNUM SB-VM::FAST-NEGATE/SIGNED)"
"((let ((tab #a((8) (unsigned-byte 8) 8 0 0 11 4 5 3 0)))
(let ((b (>> val 29)))
(let ((a (& val #x7)))
(^ a (aref tab b))))))")
(#(3347C83 20DD4ACE 82E422D7 D70316D3 ED955117)
"(:UNKNOWN-KEYS :KNOWN :ERROR :FULL :LOCAL)"
"((& (- (>> val 2) (>> val 19)) 7))")
(#(356A9DB 273DB1A3 42D83FFB 64D32FA7 90FDC611 B973B7A1 D9DC5A17 E0DB32ED)
"(:ALLOW-OTHER-KEYS :BREAKPOINT-NUMBER :CODE-LOCATION-SELECTOR :PRINT :CONDITION :BREAK :BREAKPOINT :PLACE)"
"((& (>> val 29) 7))")
(#(36B96CA 168D24A7 42D83FFB 4E8BB4F4 DC90D22E)
"(:ALLOW-OTHER-KEYS :SCALE :INDEX :BASE :DISP)"
"((& (+ (>> val 1) (>> val 19)) 7))")
(#(3A9E0C9 C48E090 2CBA8025 609F41C9 7997992F 7B247926 7DF2363B A7171179 B9B79FF6 E331AF48 E48FFF8A)
"(LET* LET IF SYMBOL-MACROLET MACROLET LOCALLY EVAL-WHEN PROGN SETQ QUOTE FUNCTION)"
"((let ((tab #a((8) (unsigned-byte 8) 1 0 0 11 0 8 7 9)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(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))")
(#(44525B4 78E7135 125F7E49 369D9E78 4D244188 4EEED766 50C23A77 5166495A 714B061E 768D8BB2 7D92B35C 81E21B39 88D160D7 891ABD8F
B1954899 B3988E73 C21CB849 CF5EC8DB D1321820 D6DCF825 DB690EC5 F1EA8886 FADF2FF2 FE80D3EE)
"(REPLACE NREVERSE MAP-INTO NCONC NRECONC FILL DELQ DELQ1 DELETE DELETE-IF DELETE-IF-NOT DELETE-DUPLICATES NUNION NINTERSECTION NSUBSTITUTE NSUBSTITUTE-IF NSUBSTITUTE-IF-NOT NSUBST NSUBST-IF NSUBST-IF-NOT SORT STABLE-SORT MERGE READ-SEQUENCE)"
"((let ((tab #a((16) (unsigned-byte 8) 0 15 7 15 16 1 18 0 0 31 0 21 31 13 18 4)))
(let ((b (& (>> val 4) #xf)))
(let ((a (>> (<< val 7) 28)))
(^ a (aref tab b))))))")
(#(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))")
(#(4BD45A5 82F7D2FB 87F71775 99402A3C E59E8BAB)
"(RASSOC ASSOC MEMBER POSITION FIND)"
"((& (- (>> val 1) (>> val 11)) 7))")
(#(507273D 9B69A83 6324535E 7B247926 A7171179 B866B7E5 E331AF48 E739D471 F475799D FBA778A0)
"(THE* SB-C::WITH-SOURCE-FORM PROGV MULTIPLE-VALUE-PROG1 BLOCK UNWIND-PROTECT THE PROGN IF QUOTE)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 0 11 5 0 0 10)))
(let ((b (& (>> val 1) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(507273D 150D7553 2AA5F8BA 4AD5FA8A 9109EA7F E739D471 FCF409E4)
"(:RESTORE-NSP :DYNAMIC-EXTENT :TAGBODY :BLOCK :UNWIND-PROTECT :CATCH :SPECIAL-BIND)"
"((& (>> val 7) 7))")
(#(507273D 150D7553 2AA5F8BA 9109EA7F E739D471 FCF409E4)
"(:DYNAMIC-EXTENT :TAGBODY :BLOCK :UNWIND-PROTECT :CATCH :SPECIAL-BIND)"
"((& (+ (>> val 5) (>> val 23)) 7))")
(#(54F17B8 CC3F85F 132E85C2 1E6013D9 3ACDEFE7 42D83FFB 46050970 57264E90 6F25F601 71FB8EC1 7AE3A81C 8AA13F3E AAFD7FDF AD4575D9
C25963AB CF49D139 E2DD22FE E57BCC60)
"(:ALLOW-OTHER-KEYS :RESERVE-LOCATIONS :ALIGNMENT :NUMBER-STACK-P :MOVE-ARG-VOPS :MOVE-COSTS :MOVE-VOPS :LOAD-COSTS :MOVE-FUNS :SAVE-P :CONSTANT-SCS :ALTERNATE-SCS :OPERAND-SIZE :LOCATIONS :ELEMENT-SIZE :SB :NUMBER :NAME)"
"((let ((tab #a((16) (unsigned-byte 8) 0 0 1 0 0 0 0 14 16 0 0 7 22 0 1 8)))
(let ((b (& val #xf)))
(let ((a (>> val 28)))
(^ a (aref tab b))))))")
(#(59258CB 7925BF1 24F3E4FE 606FAF4E 6A08DCBA 99A9F42F D1F36255 D7F36BC7 DCF373A6 EB23EB4A EC039932 EFF1208B)
"(AREF SB-C::^= SB-C::^ SB-C::>>= SB-C::>> SB-C::<< SB-C::U32- - SB-C::+= SB-C::U32+ + SB-C::&)"
"((let ((tab #a((8) (unsigned-byte 8) 13 13 7 12 0 0 0 0)))
(let ((b (& (>> val 1) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(59258CB 7925BF1 24F3E4FE 6A08DCBA DCF373A6 EB23EB4A EC039932 EFF1208B)
"(SB-C::>> SB-C::<< SB-C::U32- SB-C::U32+ SB-C::^ SB-C::& SB-C::+= SB-C::^=)"
"((& (- (>> val 3) (>> val 22)) 7))")
(#(59258CB 7925BF1 6A08DCBA 99A9F42F EB23EB4A EC039932)
"#(SB-C::<< SB-C::U32+ SB-C::U32- SB-C::+= SB-C::>> SB-C::>>=)"
"((& (- (>> val 2) (>> val 5)) 7))")
(#(667E35F 11459198 1FF78BA5 42D83FFB 594313BC 60D621C0 831DFC01 860D0EEC 95E54542 A2B0ECD5 A646420E B3775562 BB62E448 C42F9C28
F785EE92)
"(:ALLOW-OTHER-KEYS :PARENT :FLUSHABLE :USER-DATA :POLICY :DISABLED-PACKAGE-LOCKS :HANDLED-CONDITIONS :CLEANUP :LAMBDA :TYPE-RESTRICTIONS :TAGS :BLOCKS :VARS :FUNS :DEFAULT)"
"((let ((tab #a((8) (unsigned-byte 8) 0 9 12 0 8 4 11 7)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(727FC83 1B7909CC B569D968 D9674D40 E707070A)
"#(:ABSOLUTE :I-TYPE :S-TYPE :U-TYPE :U+I-TYPE)"
"((& (+ (>> val 6) (>> val 14)) 7))")
(#(727FC83 1FCE6B81 2878F78A 55938EB9)
"#(:ABS32 :*ABS32 :REL32 :ABSOLUTE)"
"((& (>> val 18) 3))")
(#(727FC83 4405711B 54E3A2C0 67E74E0C 69EC9CF6 6A1FC394 92D08E7F 9AD260B1 FCCC00DB)
"#(:ABSOLUTE :COND-BRANCH :UNCOND-BRANCH :LAYOUT-ID :UBFM-IMMS :PC-RELATIVE :PC-RELATIVE-LDR-STR :LDR-STR :MOVE-WIDE)"
"((let ((tab #a((8) (unsigned-byte 8) 0 5 0 12 3 3 0 2)))
(let ((b (& (>> val 4) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(727FC83 588D2B64 9D0C745F F8B597DD FBA66A22)
"(:BACK :UP :RELATIVE :WILD-INFERIORS :ABSOLUTE)"
"((& (^ (>> val 3) (>> val 7)) 7))")
(#(732BDD9 11459198 163E7558 28B27B84 42D83FFB 45E9B881 5091E960 62DBFF73 99E1605A A9867CB5 AF3DD31A CB4D6D7F CF207877 D0720886
DB0DCB72 E449C786 F4E24D80)
"(:ALLOW-OTHER-KEYS :SHARE-BLOCK-P :BLOCK-NAME :KEYWORD-BITS :N-OPTIONAL :MIN-ARGS :N-BOUND-VARS :SPECIALS :SEXPR :VALUES :SPECIAL-B :SYMBOLS :TYPE-RESTRICTIONS :EXTRA-TYPECHECKS :BINDING-TYPECHECKS :%POLICY :DECLARATIONS)"
"((let ((tab #a((16) (unsigned-byte 8) 0 1 0 0 0 0 0 9 0 4 0 13 0 0 0 26)))
(let ((b (& val #xf)))
(let ((a (>> (<< val 7) 28)))
(^ a (aref tab b))))))")
(#(755C9E8 42D83FFB 5BC6CA0F 621DB9DF 70C1F263 C0CB4E00 EB12423E)
"(:ALLOW-OTHER-KEYS :IMMEDIATE-TESTED :VALUE-TN-REF :COMPUTE-TEMP :LOAD-WIDETAG :DROP-THROUGH :EXCEPT)"
"((& (>> val 17) 7))")
(#(7E8EB38 95A3EE5 31FABC1E 6D3D4FDE 73D11A29 84B90ACE A3CDD395 EBD01872)
"(:TYPE :DOCUMENTATION :ALLOCATION :INITARG :INITFORM :ACCESSOR :WRITER :READER)"
"((& (- (>> val 5) (>> val 6)) 7))")
(#(7E8EB38 E285EA3 31FABC1E 42D83FFB 635E6BCC 6D3D4FDE 8D4BB6B9 99D0000A A4046244 AD4575D9 CD2CAFA0)
"(:ALLOW-OTHER-KEYS :DOCUMENTATION :CELL :ALLOCATION :INITFUNCTION :INITFORM :INITFORM-P :WRITERS :READERS :INITARGS :NAME)"
"((let ((tab #a((8) (unsigned-byte 8) 9 14 0 0 0 4 7 0)))
(let ((b (>> val 29)))
(let ((a (& val #x7)))
(^ a (aref tab b))))))")
(#(7E8EB38 2EFA06BE 42D83FFB 73D11A29 A3CDD395 B9968386 CF2710D0 D66C1599 FDEBE2C0)
"(:ALLOW-OTHER-KEYS :MAKUNBOUND :BOUNDP :WRITER :READER :LOCATION :ALLOCATION :TYPECHECK :SLOTD)"
"((let ((tab #a((8) (unsigned-byte 8) 8 5 4 5 0 0 0 2)))
(let ((b (>> val 29)))
(let ((a (& val #x7)))
(^ a (aref tab b))))))")
(#(805D985 2CB8AB5F 62E7601A 7DDF9D6B A141F2C7 B7131B20 DA5197C7 F03FB4B0 F098B012)
"(:PRINTER :VOP-VAR :PINNED :DELAY :DEPENDENCIES :COST :ATTRIBUTES :DECLARE :EMITTER)"
"((let ((tab #a((8) (unsigned-byte 8) 5 0 0 11 0 4 0 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(847A57F 15EA1B2C 42D83FFB A2F60CFC AFAC50C3 B7131B20 DAEC1DD5 EBD01872 EE38F6F8)
"(:ALLOW-OTHER-KEYS :FIELDS :FIELD :USE-LABEL :SIGN-EXTEND :PRINTER :PREFILTER :TYPE :VALUE)"
"((let ((tab #a((8) (unsigned-byte 8) 5 0 5 0 0 0 13 5)))
(let ((b (>> val 29)))
(let ((a (& val #x7)))
(^ a (aref tab b))))))")
(#(8FBD71C 42D83FFB 648CBBE0 99F99308 A2FD791A CD9D128B)
"(:ALLOW-OTHER-KEYS :COLINC :COLNUM :RELATIVEP :SECTIONP :POSN)"
"((& (^ val (>> val 2)) 7))")
(#(9243B73 144A7081 1E21A5F9 28B27B84 5570297F 72E2CBDA 75E7305A 77F48160 7F48ACEF 80D0C591 AB46FD79 AC841474 C05919B5 D577727F
E1B1217A F0C1D2A1)
"#(SB-ALIEN::ROOT INTEGER BOOLEAN ENUM FLOAT SINGLE-FLOAT DOUBLE-FLOAT SYSTEM-AREA-POINTER ALIEN-VALUE SB-ALIEN::POINTER SB-ALIEN::MEM-BLOCK ARRAY SB-ALIEN::RECORD SB-ALIEN::FUN VALUES C-STRING)"
"((let ((tab #a((8) (unsigned-byte 8) 0 6 12 9 0 0 8 8)))
(let ((b (& (>> val 6) #x7)))
(let ((a (>> (<< val 1) 29)))
(^ a (aref tab b))))))")
(#(9243B73 1E21A5F9 75E7305A 7F48ACEF 80D0C591 AC841474 D577727F F0C1D2A1)
"(FLOAT SB-ALIEN::MEM-BLOCK ALIEN-VALUE SINGLE-FLOAT DOUBLE-FLOAT SYSTEM-AREA-POINTER SB-ALIEN::RECORD ENUM)"
"((& (- val (>> val 27)) 7))")
(#(9243B73 1E21A5F9 80D0C591 AC841474 D577727F)
"(SYSTEM-AREA-POINTER DOUBLE-FLOAT SINGLE-FLOAT ENUM SB-ALIEN::RECORD)"
"((& (^ val (>> val 15)) 7))")
(#(95A3EE5 42D83FFB 56AE7E65 A2595136 E65A2E63)
"(:ALLOW-OTHER-KEYS :WRAP-BLOCK :ENVIRONMENT :DOC-STRING-ALLOWED :ACCESSOR)"
"((& (+ (>> val 3) (>> val 28)) 7))")
(#(95A3EE5 6D3D4FDE 73D11A29 84B90ACE A3CDD395)
"(:INITFORM :INITARG :WRITER :READER :ACCESSOR)"
"((& (>> val 26) 7))")
(#(98ECFCF 5595EEC3 634EB941 AAD616AD BD0BBA8D E6D49D13 FBF09527)
"#(((:TYPE SB-C::CLAMBDA) (:TYPE SB-C::OPTIONAL-DISPATCH) (:TYPE SB-C::FUNCTIONAL) (:TYPE CONSTANT)) ((:TYPE SB-C::LAMBDA-VAR)) ((:TYPE SB-C::DEFINED-FUN)) ((:TYPE SB-C::GLOBAL-VAR)))"
"((& (- (>> val 7) (>> val 26)) 7))")
(#(9F68C87 18919578 3B91FC64 C49039A2 E487643D F5B1443E)
"(SIMPLE-BASE-STRING SIMPLE-STRING STRING SIMPLE-VECTOR VECTOR LIST)"
"((& (^ (>> val 14) (>> val 21)) 7))")
(#(9F68C87 18919578 C49039A2 E487643D F5B1443E)
"(SIMPLE-STRING STRING SIMPLE-VECTOR VECTOR LIST)"
"((& (+ val (>> val 27)) 7))")
(#(A843D76 42D83FFB 4AFE864E 64F3EC9B 686508A6 69DEB0A1 6B650D5F 9B6C0324 9C117DC2 A11BBD24 AD4575D9 B3B59B8C B72C7D24 E80678B2
EEBA0CC8 F0078F6A)
"(:ALLOW-OTHER-KEYS :SINGLETON-P :ENUMERABLE-P :MIGHT-CONTAIN-OTHER-TYPES-P :UNPARSE :NEGATE :COMPLEX-= :SIMPLE-= :COMPLEX-INTERSECTION2 :SIMPLE-INTERSECTION2 :COMPLEX-UNION2 :SIMPLE-UNION2 :COMPLEX-SUBTYPEP-ARG2 :COMPLEX-SUBTYPEP-ARG1 :SIMPLE-SUBTYPEP :NAME)"
"((let ((tab #a((8) (unsigned-byte 8) 8 12 0 13 0 0 13 8)))
(let ((b (& (>> val 1) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(AF736AF 1A612CC9 26E73EF3 2997D748 3BFA75F3 42D83FFB 4AD0D0F0 5A250FF2 6B97E34D AD4575D9 B12D1B22 B2CF0BBC DD083852 E80678B2
ED2B9AC4 F84EA3AD)
"(:ALLOW-OTHER-KEYS :CANON-TRANSLS :TRANSLATIONS :NAME :NAME-HASH :CUSTOMARY-CASE :SIMPLIFY-NAMESTRING :UNPARSE-DIRECTORY-SEPARATOR :UNPARSE-ENOUGH :UNPARSE-FILE :UNPARSE-DIRECTORY :UNPARSE-HOST :UNPARSE-NATIVE :UNPARSE :PARSE-NATIVE :PARSE)"
"((let ((tab #a((8) (unsigned-byte 8) 13 0 2 0 12 14 8 6)))
(let ((b (& (>> val 1) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(AF736AF 1A612CC9 26E73EF3 2997D748 3BFA75F3 42D83FFB 4AD0D0F0 B2CF0BBC DD083852 E80678B2 ED2B9AC4 F84EA3AD)
"(:ALLOW-OTHER-KEYS :CUSTOMARY-CASE :SIMPLIFY-NAMESTRING :UNPARSE-DIRECTORY-SEPARATOR :UNPARSE-ENOUGH :UNPARSE-FILE :UNPARSE-DIRECTORY :UNPARSE-HOST :UNPARSE-NATIVE :UNPARSE :PARSE-NATIVE :PARSE)"
"((let ((tab #a((8) (unsigned-byte 8) 8 9 4 0 5 8 0 7)))
(let ((b (& val #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(B327A56 4DBC97D6 6FAE4B5C 7911B186)
"((:NEAREST . 0) (:ZERO . 3) (:POSITIVE-INFINITY . 1) (:NEGATIVE-INFINITY . 2))"
"((& (>> val 13) 3))")
(#(B445B28 2EF3F4BC 80D0C591 AC841474 C6B4780F)
"(BASE-CHAR CHARACTER T SINGLE-FLOAT DOUBLE-FLOAT)"
"((& (^ val (>> val 19)) 7))")
(#(BA316CC 1FE456EC 3836DEFB 5D714507 6A1FC394 A56E935B AB2C6780 B4FE847C E578E28F F36C4AC5)
"#(:ASSEMBLY-ROUTINE :CARD-TABLE-INDEX-MASK :SYMBOL-TLS-INDEX :FOREIGN :FOREIGN-DATAREF :CODE-OBJECT :LAYOUT :IMMOBILE-SYMBOL :LINKAGE-CELL :LAYOUT-ID)"
"((let ((tab #a((8) (unsigned-byte 8) 8 9 0 5 0 3 2 7)))
(let ((b (& (>> val 28) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(BCB074C 10599A53 5256235A 7CC5F551 9647F466 A49305EF)
"(:UNKNOWN :ALIEN :GLOBAL :MACRO :CONSTANT :SPECIAL)"
"((& (- (>> val 1) (>> val 4)) 7))")
(#(BCB074C 1D6F2783 5081D8FA 675FEA5B EF042E0D)
"(DEFMETHOD DESTRUCTURING-BIND :MACRO :VALUES-TYPE :FUNCTION-TYPE)"
"((& (^ (>> val 7) (>> val 15)) 7))")
(#(BCB074C 467DB9D8 80576A93 930DF36A 9D493A5F B9B79FF6 EBD01872 F251EE6A)
"(:ISSUE :SYSTEM-CLASS :TYPE :GLOSSARY :SECTION :MACRO :SPECIAL-OPERATOR :FUNCTION)"
"((& (+ (>> val 7) (>> val 29)) 7))")
(#(BDD669D 35455F60 4E3391D6 5256235A 6AC11619 A37EFB8E A7D5BCEA)
"(SB-VM::NOISE SB-VM::MASK-REGISTERS SB-VM::IMMEDIATE-CONSTANT CONSTANT SB-VM::STACK SB-VM::FLOAT-REGISTERS SB-VM::REGISTERS)"
"((& (- (>> val 2) (>> val 4)) 7))")
(#(BE6567B 2B0D415F 42D83FFB 4F638C46 5FD95B64 77A03D93 F66B2149)
"(:ALLOW-OTHER-KEYS :SECTION-START-LINE :SUFFIX-LENGTH :PREFIX-LENGTH :PER-LINE-PREFIX-END :SECTION-COLUMN :START-COLUMN)"
"((& (+ (>> val 3) (>> val 13)) 7))")
(#(C251861 11A68787 22C327CC 2407FD3F 25C970C5 384B24CF 457AED9D 511963A9 532B4EA8 62140CF6 6425593D 731427B9 732570DA 7C7F0B9C
80E0D973 831D9492 941DAF55 952EFA09 9D1BE72D 9D33EC13 9F1BEA53 A42F11A6 AFE4F6DA B81687BE C26A6B98 C4834666 CB4E73C8
DC33E6FC E09EA419 E25DFFE9 E29EA73F E9AA089A)
"#(:EQ :LT :LE :UNORD :NEQ :NLT :NLE :ORD :EQ_UQ :NGE :NGT :FALSE :NEQ_OQ :GE :GT :TRUE :EQ_OS :LT_OQ :LE_OQ :UNORD_S :NEQ_US :NLT_UQ :NLE_UQ :ORD_S :EQ_US :NGE_UQ :NGT_UQ :FALSE_OS :NEQ_OS :GE_OQ :GT_OQ :TRUE_US)"
"((let ((tab #a((16) (unsigned-byte 8) 31 21 0 31 15 0 7 0 15 1 21 31 24 31 27 20)))
(let ((b (& (>> val 8) #xf)))
(let ((a (>> (<< val 6) 28)))
(^ a (aref tab b))))))")
(#(C420C04 D4DC88F 42D83FFB 524C48E2 7D30DC7C 8C788991 8F7912D6 BB62E448 EF4737B1)
"(:ALLOW-OTHER-KEYS :ALLOW-INSTRUMENTING :LEXENV :%SOURCE-NAME :%DEBUG-NAME :HOME :BIND :KIND :VARS)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 0 4 0 0 12 1)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(C420C04 42D83FFB 524C48E2 7D30DC7C 8F7912D6 F2F895BA)
"(:ALLOW-OTHER-KEYS :LEXENV :%DEBUG-NAME :%SOURCE-NAME :INFO :KIND)"
"((& (^ val (>> val 19)) 7))")
(#(CC3F85F 32EAE7EB 3EDDB4DB 42D83FFB 60311FC5 CCC01211 D18559DF)
"(:ALLOW-OTHER-KEYS :EMERGENCY-BEST-EFFORT :METHOD-FRAME-STYLE :ARGUMENT-LIMIT :PRINT-PC :NUMBER :PRINT-FRAME-SOURCE)"
"((& (^ (>> val 7) (>> val 18)) 7))")
(#(CCE35B7 E39B2CD 1C077216 33FB65F5 3CDD7838 42D83FFB 6F31BE0A 7D30DC7C 91BE8EC1 AD4575D9 BA0D8C5F CE9862F9)
"(:ALLOW-OTHER-KEYS :UNUSED-IF :OFFSET :SCS :LOAD :LOAD-TN :DIES :BORN :TEMP :TARGET :KIND :NAME)"
"((let ((tab #a((8) (unsigned-byte 8) 8 0 0 8 8 0 8 2)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(CCE35B7 E39B2CD 2DF0AB1F 6C414B8A BA0D8C5F DE0A9C1B E468CEE4)
"(:TO :FROM :TARGET :MORE :LOAD-IF :LOAD-TN :SCS)"
"((& (+ (>> val 1) (>> val 26)) 7))")
(#(CCE35B7 33FB65F5 6C414B8A 6F31BE0A A9FD7E4C BA0D8C5F DE0A9C1B)
"(:UNUSED-IF :SCS :TO :FROM :OFFSET :SC :TARGET)"
"((& (+ (>> val 4) (>> val 8)) 7))")
(#(CD56774 2D524721 42D83FFB DB4B667C E7F043EA EBD01872)
"(:ALLOW-OTHER-KEYS :ARG-INFO :SOURCE-FORM :SPECVAR :WHERE-FROM :TYPE)"
"((& (+ (>> val 1) (>> val 4)) 7))")
(#(D64C851 1588B4F0 2870F40D 2B465CCD 42D83FFB 57C2457C 63BF2033 9E5DB7A4 9EDCE097 A8673AFB AD4575D9 B11EF72D DB5C8A6A EAB65FE6
ECF81B20 F5306542 FA4BD0D1)
"(:ALLOW-OTHER-KEYS :AUTO-CLOSE :NAME :DUAL-CHANNEL-P :INPUT-BUFFER-P :PATHNAME :DELETE-ORIGINAL :ORIGINAL :FILE :TIMEOUT :SERVE-EVENTS :EXTERNAL-FORMAT :BUFFERING :ELEMENT-TYPE :OUTPUT :INPUT :CLASS)"
"((let ((tab #a((16) (unsigned-byte 8) 0 0 0 0 13 0 0 0 0 26 10 7 0 0 0 0)))
(let ((b (& val #xf)))
(let ((a (>> (<< val 7) 28)))
(^ a (aref tab b))))))")
(#(D9ED77E 132E85C2 1D77E2C6 23511E3A 26DFCD3D 2C62CDF1 2FBB375F 2FCB0B8A 3573C22C 3884DD16 3CA49203 3EBC6344 42D83FFB 4FA1D6C1
5B6BC745 632BDBE5 68E4C2C2 68FDE47B 6E3707AB 74673302 7E1E0B08 899C08B3 A3D2F179 A5D2FA71 AD4575D9 B0113B7E B58649C9
B803E7E1 BFF51002 D7126502 DA5197C7 DAF68EAF EBD01872 F4D7A12A FABEE259)
"(:ALLOW-OTHER-KEYS :CHECK-TYPE :TRANSLATE :GC-BARRIER :AFTER-SC-SELECTION :MOVE-VOP-P :OPTIONAL-RESULTS :OPTIMIZER :TARGETS :REF-ORDERING :TEMPS :NUM-RESULTS :NUM-ARGS :VARIANT :GENERATOR-FUNCTION :MORE-ARG-LOAD-SCS :RESULT-LOAD-SCS :ARG-LOAD-SCS :MORE-RESULT-COSTS :MORE-ARG-COSTS :RESULT-COSTS :ARG-COSTS :MOVE-ARGS :SAVE-P :INFO-ARG-COUNT :NOTE :COST :LTN-POLICY :GUARD :MORE-RESULTS-TYPE :MORE-ARGS-TYPE :RESULT-TYPES :ARG-TYPES :TYPE :NAME)"
"((let ((tab #a((32) (unsigned-byte 8) 0 9 0 0 28 0 0 10 0 0 12 11 36 0 0 7 0 28 61 9 0 0 38 0 0 0 20 9 0 1 28 22)))
(let ((b (& val #x1f)))
(let ((a (>> val 27)))
(^ a (aref tab b))))))")
(#(DACC4EC 1B4B2A7B 1D6612B1 219CB8D9 3D3576EB 40EC7CBD 42D83FFB 45C68A5E 5B2A580B 62231780 68897E88 96D42968 A79928BD ADE258D6
C0641FF3 C7B8B6CD D067A311 D0AD7AE6)
"(:ALLOW-OTHER-KEYS :COVERAGE-MAP :N-JUMP-TABLE-ENTRIES :SPILLED-TNS :SPILLED-VOPS :ALIAS-TNS :ENTRIES :CONSTANTS :STACK-MESS-UPS :STACK-ALLOCATES-P :VALUES-RECEIVERS :NFP :COMPONENT-TNS :CONSTANT-TNS :WIRED-TNS :RESTRICTED-TNS :NORMAL-TNS :GLOBAL-TN-COUNTER)"
"((let ((tab #a((16) (unsigned-byte 8) 15 13 13 26 0 27 0 0 0 7 7 0 10 3 0 0)))
(let ((b (>> val 28)))
(let ((a (& val #xf)))
(^ a (aref tab b))))))")
(#(DACC4EC 1B4B2A7B 1D6612B1 219CB8D9 3D3576EB 40EC7CBD 42D83FFB 45C68A5E 5B2A580B 68897E88 96D42968 A79928BD ADE258D6 C0641FF3
C7B8B6CD D067A311 D0AD7AE6)
"(:ALLOW-OTHER-KEYS :COVERAGE-MAP :N-JUMP-TABLE-ENTRIES :SPILLED-TNS :SPILLED-VOPS :ALIAS-TNS :ENTRIES :CONSTANTS :STACK-MESS-UPS :STACK-ALLOCATES-P :VALUES-RECEIVERS :COMPONENT-TNS :CONSTANT-TNS :WIRED-TNS :RESTRICTED-TNS :NORMAL-TNS :GLOBAL-TN-COUNTER)"
"((let ((tab #a((16) (unsigned-byte 8) 15 13 13 3 0 11 7 0 0 24 7 0 10 3 0 0)))
(let ((b (>> val 28)))
(let ((a (& val #xf)))
(^ a (aref tab b))))))")
(#(DBAFDA3 4A9C7C49 581EB11B 77878591 D0B865CB)
"(:MORE-RESULT :MORE-ARGUMENT :TEMPORARY :RESULT :ARGUMENT)"
"((& (^ (>> val 3) (>> val 31)) 7))")
(#(E07876B 31685E73 331DC383 42D83FFB 7CEEE404 84F39EEA C85B2F11 C97C5E0B E4D1F085 F1F25102 F99F1C76)
"(:ALLOW-OTHER-KEYS :DEBUG-FUN :HOOKS :INITIAL-OFFSET :CODE-CALLABLES :CODE :STORAGE-INFO :VIRTUAL-LOCATION :LENGTH :SAP-MAKER :OBJECT)"
"((let ((tab #a((8) (unsigned-byte 8) 0 5 12 9 2 14 3 7)))
(let ((b (& (>> val 6) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(E07876B 331DC383 42D83FFB 7CEEE404 9F0803BD C97C5E0B F1F25102)
"(:ALLOW-OTHER-KEYS :HOOKS :SOURCE-FORM-CACHE :DEBUG-FUN :VIRTUAL-LOCATION :INITIAL-OFFSET :CODE)"
"((& (^ (>> val 18) (>> val 19)) 7))")
(#(E75FF77 27168950 92FE1EC2 CF5ABDAB F28A2060)
"(:SIZED :BYTE :WORD :DWORD :QWORD)"
"((& (^ (>> val 1) (>> val 25)) 7))")
(#(E786994 2B3B8431 39306CD4 59B25748 691ED00E 7132711D 73EA8DF2 9B4FDEF8 A4BC5E38)
"(:UNPARSED :NON-LOCAL-ENTRY :SINGLE-VALUE-RETURN :CALL-SITE :BLOCK-START :NON-LOCAL-EXIT :INTERNAL-ERROR :KNOWN-RETURN :UNKNOWN-RETURN)"
"((let ((tab #a((8) (unsigned-byte 8) 0 2 5 0 0 4 11 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(E786994 2B3B8431 59B25748 691ED00E 7132711D 73EA8DF2 9B4FDEF8 A4BC5E38)
"(:NON-LOCAL-ENTRY :SINGLE-VALUE-RETURN :CALL-SITE :BLOCK-START :NON-LOCAL-EXIT :INTERNAL-ERROR :KNOWN-RETURN :UNKNOWN-RETURN)"
"((& (- (>> val 12) (>> val 29)) 7))")
(#(EA1E569 42D83FFB 6634E9C8 825503B8 8D9B0A28 ADDD7F24)
"(:ALLOW-OTHER-KEYS :FORM :PLIST :START-POSITIONS :CREATED :NAMESTRING)"
"((& (^ (>> val 10) (>> val 28)) 7))")
(#(EA1E569 42D83FFB 6634E9C8 8D9B0A28 ADDD7F24)
"(:ALLOW-OTHER-KEYS :PLIST :START-POSITIONS :CREATED :NAMESTRING)"
"((& (- (>> val 5) (>> val 20)) 7))")
(#(EAAAF1F 7FC1A890 8247BA21 847B9C46 A32D1CBD DECBF2B4)
"(%RAW-INSTANCE-REF/COMPLEX-DOUBLE %RAW-INSTANCE-REF/COMPLEX-SINGLE %RAW-INSTANCE-REF/SIGNED-WORD %RAW-INSTANCE-REF/DOUBLE %RAW-INSTANCE-REF/SINGLE %RAW-INSTANCE-REF/WORD)"
"((& (- (>> val 1) (>> val 23)) 7))")
(#(EB88712 42D83FFB 5F52D597 81B44A78 CB4D6D7F)
"(:ALLOW-OTHER-KEYS :LEXICAL-VARS :DECLARATIONS :WALK-FORM :WALK-FUNCTION)"
"((& (^ val (>> val 14)) 7))")
(#(F14865E 606FAF4E B8B18FFE CAA95D8F D7F08D68)
"(REST FIRST CDR CAR AREF)"
"((& (- (>> val 1) (>> val 7)) 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
BC6DB7AE C7C3FCCE CFFE5CF3 D3774C34 E8C239EF FC8EAFE7)
"(UNDEFINED-CLASSOID BUILT-IN-CLASSOID CONDITION-CLASSOID STRUCTURE-CLASSOID STANDARD-CLASSOID STATIC-CLASSOID CLASSOID SIMD-PACK-512-TYPE SIMD-PACK-256-TYPE 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) 31 7 31 3 15 16 31 13 18 31 13 27 0 13 18 0)))
(let ((b (& (>> val 9) #xf)))
(let ((a (>> (<< val 7) 28)))
(^ a (aref tab b))))))")
(#(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))))))")
(#(11131BE7 168C60FD 2D45A4CF 2E16A006 32030766 3AA6053C 44273B23 444AF531 47AA782C 5302EDCF 538C4003 5595EEC3 58D40BEE
5CB9F779 634EB941 646135D9 6964D143 7058717C 7CFF98EB 7F255BE9 86C51BD4 90EC2354 977E07FB 99AE692E B9D57393 CFFE5CF3
D3774C34 E8C239EF FC8EAFE7)
"(UNDEFINED-CLASSOID BUILT-IN-CLASSOID CONDITION-CLASSOID STRUCTURE-CLASSOID STANDARD-CLASSOID STATIC-CLASSOID CLASSOID 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 17 11 3 15 9 31 20 11 21 16 31 0 13 19 0)))
(let ((b (& (>> val 9) #xf)))
(let ((a (>> (<< val 7) 28)))
(^ a (aref tab b))))))")
(#(11131BE7 168C60FD 2D45A4CF 2E16A006 32030766 3AA6053C 444AF531 47AA782C 5302EDCF 5CB9F779 6964D143 7058717C 83A1A47F
86C51BD4 977E07FB B9D57393 BC6DB7AE C7C3FCCE 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 SIMD-PACK-256-TYPE)) ((:TYPE SIMD-PACK-512-TYPE)) ((:TYPE ALIEN-TYPE-TYPE)))"
"((let ((tab #a((16) (unsigned-byte 8) 0 13 0 0 9 0 13 1 0 21 0 24 0 19 1 0)))
(let ((b (& val #xf)))
(let ((a (>> val 28)))
(^ a (aref tab b))))))")
(#(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 32030766 3AA6053C 444AF531 47AA782C 5302EDCF 5CB9F779 6964D143 7058717C 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 ALIEN-TYPE-TYPE)))"
"((let ((tab #a((8) (unsigned-byte 8) 14 0 13 0 12 6 13 0)))
(let ((b (& (>> val 3) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(11131BE7 168C60FD 2D45A4CF 2E16A006 3AA6053C 444AF531 5302EDCF 5CB9F779 6964D143 7058717C 83A1A47F 86C51BD4 977E07FB
B9D57393 BC6DB7AE C7C3FCCE CFFE5CF3 D3774C34)
"#(((:TYPE UNKNOWN-TYPE) (:TYPE HAIRY-TYPE) (:TYPE SIMD-PACK-512-TYPE) (:TYPE SIMD-PACK-256-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((16) (unsigned-byte 8) 0 0 0 0 7 0 15 0 0 21 0 9 0 16 5 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))))))")
(#(11131BE7 168C60FD 2D45A4CF 2E16A006 3AA6053C 444AF531 5302EDCF 5CB9F779 6964D143 7058717C 86C51BD4 977E07FB B9D57393
CFFE5CF3 D3774C34)
"#(((:TYPE UNKNOWN-TYPE) (:TYPE HAIRY-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) 15 12 0 0 0 15 12 0)))
(let ((b (& (>> val 2) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(11131BE7 2D45A4CF 2E16A006 3AA6053C 444AF531 47AA782C 5302EDCF 7058717C 86C51BD4 B9D57393 D3774C34)
"#(((:TYPE UNION-TYPE) (:TYPE INTERSECTION-TYPE) (:TYPE COMPOUND-TYPE)) ((:TYPE NEGATION-TYPE)) ((:TYPE CONS-TYPE)) ((:TYPE ARRAY-TYPE)) ((:TYPE CONSTANT-TYPE)) ((:TYPE VALUES-TYPE) (:TYPE FUN-TYPE) (:TYPE FUN-DESIGNATOR-TYPE) (:TYPE ARGS-TYPE)))"
"((let ((tab #a((8) (unsigned-byte 8) 0 5 0 0 0 0 1 8)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(113CB58C 40DF2367 6C697EEC A3A83C0C BCC7F46E CC4FD31D)
"(:DEFINED-METHOD :DEFINED :DEFINED-HERE :ASSUMED :DECLARED-VERIFY :DECLARED)"
"((& (+ val (>> val 5)) 7))")
(#(113CB58C 40DF2367 BCC7F46E CC4FD31D)
"(:DEFINED :ASSUMED :DEFINED-METHOD :DECLARED)"
"((& val 3))")
(#(118C3C77 42D83FFB 4F5809D0 B9B79FF6 F785EE92 FFD3A3E3)
"(:ALLOW-OTHER-KEYS :USER-DATA :FUNCTION :INCLUSIVE-PERMITTED :PREPOSITION-GROUPS :NAMES)"
"((& (^ (>> val 5) (>> val 22)) 7))")
(#(120FC1D0 2788924E 2C444648 42D83FFB 488BF057 97EE124C AD4575D9 BB3436A8 EBD01872)
"(:ALLOW-OTHER-KEYS :CASE :DEFAULTS :VERSION :TYPE :NAME :DIRECTORY :DEVICE :HOST)"
"((let ((tab #a((8) (unsigned-byte 8) 0 13 0 0 0 0 2 4)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(120FC1D0 2C444648 488BF057 97EE124C AD4575D9 EBD01872)
"(:VERSION :TYPE :NAME :DIRECTORY :DEVICE :HOST)"
"((& (^ val (>> val 26)) 7))")
(#(121068DD 2C2B8E55 37D0286E 4D61368F 58110E7F 67EE2D1A 6D9A883D 742D4C54 74589D82 897B4656 9F7795D1 A68A3965 CE783BB2
EAA3DA5C EEB4A80D F9BA9C52 FD11F4B0)
"#(((:TYPE SB-C::REF)) ((:TYPE SB-C::CIF)) ((:TYPE SB-C:JUMP-TABLE)) ((:TYPE SB-C::VOP-JUMPER)) ((:TYPE SB-C::COMBINATION) (:TYPE SB-C::MV-COMBINATION) (:TYPE SB-C::BASIC-COMBINATION)) ((:TYPE BIND)) ((:TYPE EXIT)) ((:TYPE SB-C::ENTRY)) ((:TYPE SB-C::CRETURN)) ((:TYPE SB-C::CSET)) ((:TYPE DELAY) (:TYPE SB-C::ARRAY-INDEX-CAST) (:TYPE CAST)) ((:TYPE SB-C::ENCLOSE)) ((:TYPE SB-C::CDYNAMIC-EXTENT)))"
"((let ((tab #a((16) (unsigned-byte 8) 7 0 0 0 7 0 3 0 0 0 11 0 13 0 19 0)))
(let ((b (& val #xf)))
(let ((a (>> val 28)))
(^ a (aref tab b))))))")
(#(121068DD 2C2B8E55 37D0286E 4D61368F 58110E7F 67EE2D1A 6D9A883D 742D4C54 74589D82 897B4656 9F7795D1 A68A3965 CE783BB2
EAA3DA5C EEB4A80D FD11F4B0)
"#(((:TYPE SB-C::VOP-JUMPER) (:TYPE SB-C:JUMP-TABLE) (:TYPE SB-C::CDYNAMIC-EXTENT) (:TYPE SB-C::ENCLOSE) (:TYPE EXIT) (:TYPE DELAY) (:TYPE SB-C::ARRAY-INDEX-CAST) (:TYPE CAST) (:TYPE SB-C::MV-COMBINATION) (:TYPE SB-C::ENTRY) (:TYPE SB-C::CIF) (:TYPE SB-C::CRETURN)) ((:TYPE SB-C::COMBINATION)) ((:TYPE SB-C::REF)) ((:TYPE SB-C::CSET)) ((:TYPE BIND)))"
"((let ((tab #a((8) (unsigned-byte 8) 0 5 0 12 11 15 14 12)))
(let ((b (& (>> val 15) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(121068DD 37D0286E 4D61368F 58110E7F 67EE2D1A 6D9A883D 742D4C54 74589D82 897B4656 9F7795D1 A68A3965 CE783BB2 EAA3DA5C
EEB4A80D F9BA9C52 FD11F4B0)
"#(((:TYPE SB-C::REF)) ((:TYPE SB-C::COMBINATION) (:TYPE SB-C::MV-COMBINATION) (:TYPE SB-C::BASIC-COMBINATION)) ((:TYPE SB-C::CIF)) ((:TYPE SB-C:JUMP-TABLE)) ((:TYPE SB-C::CSET)) ((:TYPE DELAY) (:TYPE SB-C::ARRAY-INDEX-CAST) (:TYPE CAST)) ((:TYPE BIND)) ((:TYPE SB-C::CRETURN)) ((:TYPE SB-C::ENTRY)) ((:TYPE SB-C::ENCLOSE)) ((:TYPE SB-C::CDYNAMIC-EXTENT)) ((:TYPE EXIT)))"
"((let ((tab #a((8) (unsigned-byte 8) 0 13 12 4 12 12 0 4)))
(let ((b (& (>> val 7) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(121068DD 37D0286E 4D61368F 58110E7F 67EE2D1A 6D9A883D 742D4C54 74589D82 897B4656 9F7795D1 A68A3965 F9BA9C52)
"#(((:TYPE SB-C::REF) (:TYPE BIND)) ((:TYPE SB-C::CIF)) ((:TYPE SB-C::CSET)) ((:TYPE SB-C::CRETURN)) ((:TYPE EXIT)) ((:TYPE SB-C::COMBINATION) (:TYPE SB-C::MV-COMBINATION) (:TYPE SB-C::BASIC-COMBINATION)) ((:TYPE DELAY) (:TYPE SB-C::ARRAY-INDEX-CAST) (:TYPE CAST)))"
"((let ((tab #a((8) (unsigned-byte 8) 0 12 0 12 0 2 15 0)))
(let ((b (& (>> val 2) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(121068DD 37D0286E 58110E7F 67EE2D1A 6D9A883D 897B4656 A68A3965)
"#(((:TYPE BIND)) ((:TYPE SB-C::REF)) ((:TYPE DELAY)) ((:TYPE SB-C::ARRAY-INDEX-CAST) (:TYPE CAST)) ((:TYPE SB-C::CSET)) ((:TYPE SB-C::COMBINATION)))"
"((& (+ (>> val 1) (>> val 27)) 7))")
(#(121068DD 4D61368F 58110E7F 67EE2D1A 6D9A883D 742D4C54 74589D82 897B4656 9F7795D1 A68A3965)
"#(((:TYPE SB-C::REF)) ((:TYPE SB-C::COMBINATION)) ((:TYPE SB-C::CIF)) ((:TYPE SB-C::CRETURN)) ((:TYPE SB-C::MV-COMBINATION)) ((:TYPE EXIT)) ((:TYPE SB-C::CSET)) ((:TYPE DELAY) (:TYPE SB-C::ARRAY-INDEX-CAST) (:TYPE CAST)))"
"((let ((tab #a((8) (unsigned-byte 8) 0 12 5 2 3 13 0 0)))
(let ((b (& (>> val 7) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(121068DD 4D61368F 58110E7F 67EE2D1A 6D9A883D 74589D82 897B4656 A68A3965)
"#(((:TYPE SB-C::REF)) ((:TYPE SB-C::COMBINATION)) ((:TYPE SB-C::MV-COMBINATION)) ((:TYPE EXIT)) ((:TYPE SB-C::CSET)) ((:TYPE DELAY) (:TYPE SB-C::ARRAY-INDEX-CAST) (:TYPE CAST)))"
"((& (- (>> val 4) (>> val 16)) 7))")
(#(121068DD 58110E7F 67EE2D1A 6D9A883D 742D4C54 897B4656 A68A3965)
"#(((:TYPE SB-C::CIF) (:TYPE SB-C::COMBINATION) (:TYPE DELAY) (:TYPE SB-C::ARRAY-INDEX-CAST) (:TYPE CAST) (:TYPE SB-C::REF) (:TYPE SB-C::CSET)))"
"((& (- (>> val 4) (>> val 16)) 7))")
(#(126ADB02 31B095DD 42D83FFB 4341F7D8 63C971D7 7A80F201 7B408880 8F7912D6 EBD01872)
"(:ALLOW-OTHER-KEYS :TYPE :RESULT-SPECS :ARG-SPECS :CALLER :DEPS :FIRED :LEXENV :SOURCE-PATH)"
"((let ((tab #a((8) (unsigned-byte 8) 0 5 0 3 0 5 12 6)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(12DFA7D4 30944646 3FE1B094 98E8D162 9E5A73AF)
"((:UNDERFLOW . 8) (:OVERFLOW . 4) (:INEXACT . 16) (:INVALID . 1) (:DIVIDE-BY-ZERO . 2))"
"((& (- (>> val 1) (>> val 6)) 7))")
(#(13CAD052 1BBACBF8 4D00BEAF AB4685DD CFC649FE EF042E0D)
"(ALIEN-TYPE-TYPE FUN-TYPE NUMERIC-TYPE CLASSOID CONSTANT-TYPE VALUES-TYPE)"
"((& (- (>> val 2) (>> val 25)) 7))")
(#(14FF6FA7 42D83FFB 6EBC958D 95E54542 AED9FD53 C246F15A)
"(:ALLOW-OTHER-KEYS :PARENT :LAST-DEFN-SOURCE-LOC :STREAM :FILE-INFO :START-REAL-TIME)"
"((& (- val (>> val 16)) 7))")
(#(152B0C6D 1EE41FED 22BE1526 3C5BCA64 42D83FFB 554402DD 7CEB6CD6 81096515 889645EF A0A4D988 AD4575D9 BB01255C BF38ADF8
D1EEF909 E80678B2 F61C2AAF FFC9988C)
"(:ALLOW-OTHER-KEYS :SUBTYPEP :RESULT-TN :ARG-TN :DEPORT-PIN-P :DEPORT-ALLOC-GEN :DEPORT-GEN :NATURALIZE-GEN :DEPOSIT-GEN :EXTRACT-GEN :ALIEN-REP :LISP-REP :TYPE= :UNPARSE :INCLUDE :DEFSTRUCT-NAME :NAME)"
"((let ((tab #a((16) (unsigned-byte 8) 7 15 3 0 16 13 0 3 12 12 0 14 14 10 10 1)))
(let ((b (& (>> val 11) #xf)))
(let ((a (>> (<< val 31) 28)))
(^ a (aref tab b))))))")
(#(152B0C6D 1EE41FED 22BE1526 3C5BCA64 554402DD 7CEB6CD6 81096515 889645EF A0A4D988 BB01255C D1EEF909 E80678B2 F61C2AAF)
"((:UNPARSE . SB-ALIEN::ALIEN-TYPE-CLASS-UNPARSE) (:TYPE= . SB-ALIEN::ALIEN-TYPE-CLASS-TYPE=) (:SUBTYPEP . SB-ALIEN::ALIEN-TYPE-CLASS-SUBTYPEP) (:LISP-REP . SB-ALIEN::ALIEN-TYPE-CLASS-LISP-REP) (:ALIEN-REP . SB-ALIEN::ALIEN-TYPE-CLASS-ALIEN-REP) (:EXTRACT-GEN . SB-ALIEN::ALIEN-TYPE-CLASS-EXTRACT-GEN) (:DEPOSIT-GEN . SB-ALIEN::ALIEN-TYPE-CLASS-DEPOSIT-GEN) (:NATURALIZE-GEN . SB-ALIEN::ALIEN-TYPE-CLASS-NATURALIZE-GEN) (:DEPORT-GEN . SB-ALIEN::ALIEN-TYPE-CLASS-DEPORT-GEN) (:DEPORT-ALLOC-GEN . SB-ALIEN::ALIEN-TYPE-CLASS-DEPORT-ALLOC-GEN) (:DEPORT-PIN-P . SB-ALIEN::ALIEN-TYPE-CLASS-DEPORT-PIN-P) (:ARG-TN . SB-ALIEN::ALIEN-TYPE-CLASS-ARG-TN) (:RESULT-TN . SB-ALIEN::ALIEN-TYPE-CLASS-RESULT-TN))"
"((let ((tab #a((8) (unsigned-byte 8) 8 0 5 2 0 15 0 0)))
(let ((b (& (>> val 4) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(15416355 42D83FFB 4341F7D8 63C971D7 8F7912D6)
"(:ALLOW-OTHER-KEYS :HOOK :FIRED :LEXENV :SOURCE-PATH)"
"((& (- val (>> val 4)) 7))")
(#(1588B4F0 2A4B00C6 2B465CCD 42D83FFB 96A5F5BD B0408856 B8D32AF5 ECF81B20 FA4BD0D1)
"(:ALLOW-OTHER-KEYS :OVERLAPPED :AUTO-CLOSE :CLASS :EXTERNAL-FORMAT :IF-DOES-NOT-EXIST :IF-EXISTS :ELEMENT-TYPE :DIRECTION)"
"((let ((tab #a((8) (unsigned-byte 8) 0 4 0 10 0 0 3 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(1588B4F0 2A4B00C6 2B465CCD 42D83FFB 96A5F5BD B8D32AF5 ECF81B20 FA4BD0D1)
"(:ALLOW-OTHER-KEYS :AUTO-CLOSE :CLASS :EXTERNAL-FORMAT :IF-DOES-NOT-EXIST :IF-EXISTS :ELEMENT-TYPE :DIRECTION)"
"((& (^ val (>> val 9)) 7))")
(#(15CC0915 42D83FFB 6FA6ADD3 7D30DC7C 81DE9D83 FEFAF033)
"(:ALLOW-OTHER-KEYS :FUNCTIONAL :SAME-BLOCK-P :INLINEP :INLINE-EXPANSION :KIND)"
"((& (+ (>> val 7) (>> val 30)) 7))")
(#(1607B33C 380E1F3F 75FB05B6 87C835DD 9DD07497 A4EDA9A1 E0AD3E74 F7158E95 FD00B976)
"(SB-VM::COMPLEX-SINGLE-REG SB-VM::COMPLEX-DOUBLE-REG SB-VM::DOUBLE-REG SB-VM::SINGLE-REG SB-VM::DESCRIPTOR-REG SB-VM::SAP-REG SB-VM::SIGNED-REG SB-VM::UNSIGNED-REG SB-VM::ANY-REG)"
"((let ((tab #a((8) (unsigned-byte 8) 12 0 0 5 5 0 0 0)))
(let ((b (>> val 29)))
(let ((a (& val #x7)))
(^ a (aref tab b))))))")
(#(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))")
(#(163E7558 42D83FFB 5A95FD85 5D9A19B2 E7AA772E)
"(:ALLOW-OTHER-KEYS :KEYS :TYPES :MAX-ARGS :MIN-ARGS)"
"((& (+ val (>> val 25)) 7))")
(#(168C60FD 5CB9F779 6964D143 977E07FB CFFE5CF3)
"(NUMERIC-UNION-TYPE MEMBER-TYPE CHARACTER-SET-TYPE UNKNOWN-TYPE HAIRY-TYPE)"
"((& (- (>> val 4) (>> val 21)) 7))")
(#(168D24A7 2788924E 319945CE 34D9EA36 42D83FFB 73D73323 76F042E9 81133902 84F39EEA 8A49CBA5 94DE7EAB A078BD39 AB46FD79
B5660628 C246F15A D745DDFD D7B21252 F87BBA2E)
"(:ALLOW-OTHER-KEYS :SUPPRESS-ERRORS :PPRINT-DISPATCH :LINES :MISER-WIDTH :RIGHT-MARGIN :READABLY :GENSYM :ARRAY :CASE :LENGTH :LEVEL :PRETTY :CIRCLE :BASE :RADIX :ESCAPE :STREAM)"
"((let ((tab #a((16) (unsigned-byte 8) 0 0 0 0 0 7 15 7 0 0 13 3 26 13 0 22)))
(let ((b (& (>> val 7) #xf)))
(let ((a (>> (<< val 7) 28)))
(^ a (aref tab b))))))")
(#(168D24A7 2788924E 319945CE 34D9EA36 42D83FFB 73D73323 76F042E9 81133902 84F39EEA 8A49CBA5 94DE7EAB A078BD39 AB46FD79
B5660628 D745DDFD D7B21252 F87BBA2E)
"(:ALLOW-OTHER-KEYS :SUPPRESS-ERRORS :PPRINT-DISPATCH :LINES :MISER-WIDTH :RIGHT-MARGIN :READABLY :GENSYM :ARRAY :CASE :LENGTH :LEVEL :PRETTY :CIRCLE :BASE :RADIX :ESCAPE)"
"((let ((tab #a((16) (unsigned-byte 8) 0 0 0 0 0 7 15 0 0 0 13 3 14 13 0 22)))
(let ((b (& (>> val 7) #xf)))
(let ((a (>> (<< val 7) 28)))
(^ a (aref tab b))))))")
(#(16A886E3 4899E277 4E713420 52383212 712E187F AD5CCCEE AEF17DD1 B5FBA0DF C37C7C73 C53C5D56 D3880CF4 E456475A ECDCC3EF)
"#(:REQUIRED &OPTIONAL &REST &MORE &KEY &AUX &ENVIRONMENT &WHOLE &ALLOW-OTHER-KEYS &BODY :POST-ENV :POST-REST :POST-MORE)"
"((let ((tab #a((8) (unsigned-byte 8) 8 4 14 0 2 0 13 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(17D52C83 25377C73 2B465CCD 30F97264 417AC5DD 42D83FFB 55D20604 BCFA2708 DB5C8A6A)
"(:ALLOW-OTHER-KEYS :STYLE-WARNING-TRACKER :SUBFORMS :POSITIONS :FORMS :WRITE-DATE :PATHNAME :EXTERNAL-FORMAT :%TRUENAME)"
"((let ((tab #a((8) (unsigned-byte 8) 13 0 5 0 5 4 0 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(1873EDAE 3E15845B 5A8E5A04 7C15D24A 7CC5F551 89DC592F 8EF36E51 A22B5571 A42EDADD A49305EF B1478F0B B31CDF30 BBF9B8CE
BFA65DEC D31B15E2 D506BD28 E2F74C2C EBD01872)
"(DECLARATION DEPRECATED MAYBE-INLINE NOTINLINE INLINE ENABLE-PACKAGE-LOCKS DISABLE-PACKAGE-LOCKS UNMUFFLE-CONDITIONS MUFFLE-CONDITIONS OPTIMIZE END-BLOCK START-BLOCK FREEZE-TYPE FTYPE TYPE ALWAYS-BOUND GLOBAL SPECIAL)"
"((let ((tab #a((16) (unsigned-byte 8) 9 0 0 0 21 0 0 0 13 0 22 0 7 11 14 12)))
(let ((b (& val #xf)))
(let ((a (>> val 28)))
(^ a (aref tab b))))))")
(#(1894EF0F 1B5666D7 2091FC29 42D83FFB 4F5809D0 606EE9F6 6146FDEA 704F55EE 804A41A7 8B32A898 9EF9A0A6 A12352A9 B3B7ED4C
BFAC65A0 F1D63D7A F7CBDD5F FB3D98A2 FBB3277A)
"(:ALLOW-OTHER-KEYS :COUNT-CHARS :STRING-TO-OCTETS-FUN :OCTETS-TO-STRING-FUN :WRITE-C-STRING-FUN :READ-C-STRING-FUN :BYTES-FOR-CHAR-FUN :RESYNC-FUN :WRITE-CHAR-FULL-BUFFERED-FUN :WRITE-CHAR-LINE-BUFFERED-FUN :WRITE-CHAR-NONE-BUFFERED-FUN :WRITE-N-BYTES-FUN :READ-CHAR-FUN :READ-N-CHARS-FUN :REPLACEMENT :DEFAULT-REPLACEMENT-CHARACTER :NEWLINE-VARIANT :NAMES)"
"((let ((tab #a((16) (unsigned-byte 8) 13 0 1 0 0 0 1 1 24 0 0 7 1 0 18 1)))
(let ((b (& val #xf)))
(let ((a (>> (<< val 7) 28)))
(^ a (aref tab b))))))")
(#(18ED9EA3 40E4CB82 42D83FFB 71FB8EC1 720C8616 9A5017F1)
"(:ALLOW-OTHER-KEYS :ALIGNMENT :N-WORDS :RAW-TYPE :COMPARATOR :ACCESSOR-FUN)"
"((& (- (>> val 1) (>> val 25)) 7))")
(#(19694478 27DEC9AD 2DF3F329 36F40154 402C2D11 42D83FFB 8F0E568A 9127DEAB B7131B20 C26EC306)
"(:ALLOW-OTHER-KEYS :EVEX :NDS :L :W :XMMREG-MEM-SIZE :REG-MEM-SIZE :OPCODE-PREFIX :PRINTER :MORE-FIELDS)"
"((let ((tab #a((8) (unsigned-byte 8) 8 0 3 0 5 9 5 0)))
(let ((b (>> val 29)))
(let ((a (& val #x7)))
(^ a (aref tab b))))))")
(#(1ADFFA0F 53C450C1 6ED40272 7CFF71F8 96E6C362 DB5C8A6A EF9C515E)
"(LOGICAL-PATHNAME PATHNAME SB-IMPL::FILL-POINTER-OUTPUT-STREAM SB-IMPL::STRING-OUTPUT-STREAM SB-IMPL::STRING-INPUT-STREAM FD-STREAM ANSI-STREAM)"
"((& (+ (>> val 3) (>> val 4)) 7))")
(#(1ADFFA0F 53C450C1 6ED40272 96E6C362 EF9C515E)
"(SB-IMPL::FILL-POINTER-OUTPUT-STREAM SB-IMPL::STRING-OUTPUT-STREAM SB-IMPL::STRING-INPUT-STREAM FD-STREAM ANSI-STREAM)"
"((& (+ (>> val 2) (>> val 14)) 7))")
(#(1B2EB4EB 38DD7CF2 A7AE26A0 ACAE2E7F FD10BF43)
"(:SLOT-SET :STRUCT-SET :SVSET :RPLACD :RPLACA)"
"((& (+ val (>> val 31)) 7))")
(#(1C077216 1DA11FBF 30BCF1E4 3362CBC8 35AD1E77 5256235A 56AE7E65 68A18EE5 B6EC497E C3CD666D CD96C390 D8E49987)
"(: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 0 12 0 14 6 0)))
(let ((b (>> val 29)))
(let ((a (& val #x7)))
(^ a (aref tab b))))))")
(#(1C077216 1DA11FBF 30BCF1E4 3362CBC8 35AD1E77 5256235A 56AE7E65 68A18EE5 C3CD666D CD96C390 D8E49987)
"(:ARG-PASS :UNUSED :ALIAS :COMPONENT :CONSTANT :LOAD :SAVE-ONCE :SAVE :DEBUG-ENVIRONMENT :ENVIRONMENT :NORMAL)"
"((let ((tab #a((8) (unsigned-byte 8) 14 0 0 15 0 0 6 0)))
(let ((b (>> val 29)))
(let ((a (& val #x7)))
(^ a (aref tab b))))))")
(#(1C077216 35AD1E77 4A9C7C49 4D7290B0 581EB11B)
"(:SAVE :RESULT :EVAL :ARGUMENT :LOAD)"
"((& (+ (>> val 1) (>> val 12)) 7))")
(#(1CE2F046 3BF8051A 76E16869 7DD377BC 9C219293 F5E8B3F3)
"(SB-VM::DISPLACED-FROM SB-VM::DISPLACED-P SB-VM::DISPLACEMENT SB-VM::ELEMENTS FILL-POINTER SB-VM::DATA)"
"((& (- (>> val 21) (>> val 25)) 7))")
(#(1DA11FBF 30BCF1E4 5256235A 56AE7E65)
"(:COMPONENT :ENVIRONMENT :CONSTANT :UNUSED)"
"((& val 3))")
(#(1DA11FBF 42D83FFB 5ECBF2E6 9515DD19 A58BD3CC F26B59C0)
"(:ALLOW-OTHER-KEYS :LAST :START :SUCC :PRED :COMPONENT)"
"((& (+ (>> val 2) (>> val 19)) 7))")
(#(1DED3ADB 20DD4ACE 7584640E 8EA2EA63)
"(:FORCE :ERROR :WARN :PUNT)"
"((& (>> val 21) 3))")
(#(1E21A5F9 236BED52 2A6BF857 60BC6EF6 80D0C591 A245F357 AC841474 CB6BDBB0)
"(SYSTEM-AREA-POINTER SB-VM::UNSIGNED-BYTE-63 SB-VM::UNSIGNED-BYTE-64 SB-VM::SIGNED-BYTE-64 COMPLEX-SINGLE-FLOAT COMPLEX-DOUBLE-FLOAT SINGLE-FLOAT DOUBLE-FLOAT)"
"((& (- (>> val 8) (>> val 28)) 7))")
(#(1E21A5F9 2A6BF857 80D0C591 AC841474 CB6BDBB0)
"(SB-VM::SIGNED-BYTE-64 SB-VM::UNSIGNED-BYTE-64 SYSTEM-AREA-POINTER SINGLE-FLOAT DOUBLE-FLOAT)"
"((& (+ (>> val 4) (>> val 10)) 7))")
(#(1E21A5F9 629200C5 7CFF71F8 A8892768 B9B79FF6 DB5C8A6A EF881CEA)
"(SIMD-PACK-512-MASK LOGICAL-PATHNAME PATHNAME WEAK-POINTER SYSTEM-AREA-POINTER FUNCTION COMPLEX)"
"((& (+ (>> val 2) (>> val 11)) 7))")
(#(1E21A5F9 7CFF71F8 A8892768 B9B79FF6 DB5C8A6A EF881CEA)
"(LOGICAL-PATHNAME PATHNAME WEAK-POINTER SYSTEM-AREA-POINTER FUNCTION COMPLEX)"
"((& (- (>> val 8) (>> val 15)) 7))")
(#(1EB2407E 6E70844A B9B79FF6 ECE1DD11)
"(SB-C::INHIBIT-FLUSHING SB-C::MODIFYING FUNCTION-DESIGNATOR FUNCTION)"
"((>> val 30))")
(#(1EDCD394 1F3E3A22 3BF8051A 42D83FFB 50731FD3 AD4575D9 E8440E40 ECF81B20)
"(:ALLOW-OTHER-KEYS :DATA :DTYPE :SPECIFIED-TYPE :TEMPVARS :HISTORY :CLASS :NAME)"
"((& (- val (>> val 5)) 7))")
(#(1F1148B1 42D83FFB 4D28C61A 53154864 69348843 9E6D8DE3 D772E431 E7FE2EDD)
"(:ALLOW-OTHER-KEYS :SYNCHRONIZED :WEAKNESS :HASH-FUNCTION :REHASH-THRESHOLD :REHASH-SIZE :SIZE :TEST)"
"((& (^ val (>> val 28)) 7))")
(#(1F659069 359CB801 42D83FFB 4D8AA718 533CFE4E 59B8CDC8 73C13473 AB2C6780 AD4575D9 F682E177 F7F8A7D9 FD062757)
"(:ALLOW-OTHER-KEYS :PREDICATE :TRANSLATION :PCL-CLASS :%LOCK :SUBCLASSES :SOURCE-LOCATION :DIRECT-SUPERCLASSES :STATE :LAYOUT :NAME :%BITS)"
"((let ((tab #a((8) (unsigned-byte 8) 0 13 0 7 0 5 0 12)))
(let ((b (>> val 29)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(1FE456EC 3836DEFB 5D714507 6A1FC394 A56E935B AB2C6780 B4FE847C E578E28F F36C4AC5)
"#(:ASSEMBLY-ROUTINE :CARD-TABLE-INDEX-MASK :SYMBOL-TLS-INDEX :FOREIGN :FOREIGN-DATAREF :CODE-OBJECT :LAYOUT :IMMOBILE-SYMBOL :LAYOUT-ID)"
"((let ((tab #a((8) (unsigned-byte 8) 13 0 0 3 0 0 0 3)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(1FF78BA5 2291DA8E 42D83FFB 50FFF308 774147E2 82F68790 925C7089 A58F1BE3 D1CFC247 DDF478CA E5A66CDA EE241B0F F7F372BB)
"(:ALLOW-OTHER-KEYS :HANDLED-CONDITIONS :ORIGINAL-SOURCE-PATH :INITIALIZED :FORMAT-ARGS :PATH :FILE-POSITION :FILE-NAME :CONTEXT :ORIGINAL-FORM-STRING :ORIGINAL-FORM :%SOURCE :%ENCLOSING-SOURCE)"
"((let ((tab #a((8) (unsigned-byte 8) 0 12 0 14 0 5 11 7)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(203C7904 42226AC9 80576A93 EAD18698)
"(:SECTION-RELATIVE :LINE-RELATIVE :SECTION :LINE)"
"((>> val 30))")
(#(208FE110 3B4ABA52 6C7BFBCB AB4685DD AEC88182 D110413A E0C5F126 E9E0577D)
"(ARRAY-TYPE NEGATION-TYPE ALIEN-TYPE-TYPE SIMD-PACK-512-TYPE SIMD-PACK-256-TYPE SIMD-PACK-TYPE UNKNOWN-TYPE HAIRY-TYPE)"
"((& (+ val (>> val 29)) 7))")
(#(20DD4ACE 56B00232 7584640E 75F567F4 90CA5ADC)
"(ERROR WARN STYLE-WARN SB-C:COMPILER-WARN SB-C:COMPILER-STYLE-WARN)"
"((& (- (>> val 4) (>> val 8)) 7))")
(#(20DD4ACE 7584640E 9F7FA0B6 FA6275AB)
"(SIGNAL ERROR CERROR WARN)"
"((>> val 30))")
(#(20E8209B 21E9089F 3FE1B094 42D83FFB F8818B27)
"(:ALLOW-OTHER-KEYS :SYSTEMP :OVERFLOW :STACK-ALLOCATE-P :FLAG-TN)"
"((& (+ (>> val 12) (>> val 18)) 7))")
(#(20E8209B 3FE1B094 42D83FFB B6CE09C5 DC90D22E)
"(:ALLOW-OTHER-KEYS :AVX512 :SYSTEMP :OVERFLOW :SCALE)"
"((& (- (>> val 3) (>> val 4)) 7))")
(#(20F3DEB2 27DEC9AD 2DF3F329 42D83FFB 497F147D 5023D356 8CDBDD0D 9B1DBA5A A005BD53 A569A1AB C425F32A)
"(:ALLOW-OTHER-KEYS :DISP-N :VM :EVEX-B :Z :AAA :VVVV :W :OPCODE-PREFIX :LL :REMAINING-BYTES)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 2 13 0 9 0 5)))
(let ((b (& (>> val 7) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(20F3DEB2 27DEC9AD 2DF3F329 42D83FFB 497F147D 9B1DBA5A A569A1AB)
"(:ALLOW-OTHER-KEYS :EVEX-B :Z :AAA :OPCODE-PREFIX :W :LL)"
"((& (>> val 25) 7))")
(#(20F3DEB2 29F3ECDD 2AF3EE70 35F3FFC1 36F40154 38F4047A 39F4060D 3BF40933 3DF40C59 3FF40F7F 57344F50 672DACBB 731427B9
732570DA 941DAF55 A42F11A6 BE197445 BF1975D8 C61980DD C8198403 C9198596 CA198729 CC198A4F D119922E D3FFFF01 D82AE654
DA19A059 DB19A1EC DE000EBF E822B0BF)
"((:O . 0) (:NO . 1) (:B . 2) (:NAE . 2) (:C . 2) (:AE . 3) (:NB . 3) (:NC . 3) (:E . 4) (:Z . 4) (:NE . 5) (:NZ . 5) (:BE . 6) (:NA . 6) (:A . 7) (:NBE . 7) (:S . 8) (:NS . 9) (:P . 10) (:PE . 10) (:PO . 11) (:NP . 11) (:L . 12) (:NGE . 12) (:GE . 13) (:NL . 13) (:LE . 14) (:NG . 14) (:G . 15) (:NLE . 15))"
"((let ((tab #a((16) (unsigned-byte 8) 0 31 21 21 16 17 12 0 3 0 18 18 22 13 29 7)))
(let ((b (& val #xf)))
(let ((a (>> val 28)))
(^ a (aref tab b))))))")
(#(20F3DEB2 29F3ECDD 36F40154 3DF40C59 3FF40F7F 731427B9 732570DA 941DAF55 A42F11A6 BF1975D8 C61980DD C8198403 D119922E
DA19A059)
"(:NGE :NG :NLE :NL :L :LE :G :GE :Z :NZ :E :NE :NS :S)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 8 4 13 12 2 1)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(20F3DEB2 3FF40F7F C8198403 D119922E)
"(:NE :E :NZ :Z)"
"((& (>> val 3) 3))")
(#(225B3CE5 42D83FFB 645CF61B 64BF0315 8A9A92D0 9BC82B5D EBD01872)
"(:ALLOW-OTHER-KEYS :INFINITY-DATA :OPERATIONS :FLAG-VARIABLE :TEMP-VARIABLE :TYPE :ANSWER-VARIABLE)"
"((& (^ (>> val 3) (>> val 30)) 7))")
(#(23533B6B 42D83FFB 5C084D2B 7D30DC7C AD4575D9)
"(:ALLOW-OTHER-KEYS :WARNINGS :COUNT :KIND :NAME)"
"((& (- val (>> val 5)) 7))")
(#(235ED22C 2BCE7F62 611D1FAD 75E7305A 80D0C591 AC841474 D0F360C2 D2F86037)
"(FLOAT RATIONAL REAL LONG-FLOAT DOUBLE-FLOAT SINGLE-FLOAT SHORT-FLOAT *)"
"((& (- (>> val 11) (>> val 15)) 7))")
(#(235ED22C 42D83FFB 75E7305A A8892768 E06FC299)
"(:ALLOW-OTHER-KEYS :UNSIGNED :COMPLEX :FLOAT :RATIONAL)"
"((& val 7))")
(#(235ED22C 611D1FAD 80D0C591 AC841474 D2F86037)
"(RATIONAL LONG-FLOAT DOUBLE-FLOAT SINGLE-FLOAT SHORT-FLOAT)"
"((& (>> val 24) 7))")
(#(235ED22C 72E2CBDA 75E7305A 80D0C591 AC841474)
"(DOUBLE-FLOAT SINGLE-FLOAT FLOAT RATIONAL INTEGER)"
"((& (+ (>> val 1) (>> val 23)) 7))")
(#(236A976D 3F90074C 42D83FFB 4C9563A8 5393DAD1 71FB8EC1 7E1E0B08 B169B946 E940F22A)
"(:ALLOW-OTHER-KEYS :CONVENTION :INTO-STUB :STUB :VARARGS :ARG-TYPES :RESULT-TYPE :ALIGNMENT :BITS)"
"((let ((tab #a((8) (unsigned-byte 8) 0 5 15 2 0 5 0 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(236BED52 2A6BF857 5F3556C7 72E2CBDA CB6BDBB0 D0BE7277 D2214AE8)
"(SB-VM::POSITIVE-FIXNUM FIXNUM INTEGER BIGNUM SB-VM::UNSIGNED-BYTE-63 SB-VM::UNSIGNED-BYTE-64 SB-VM::SIGNED-BYTE-64)"
"((& (- val (>> val 19)) 7))")
(#(236BED52 5F3556C7 72E2CBDA CB6BDBB0 D0BE7277 D2214AE8)
"(INTEGER BIGNUM SB-VM::UNSIGNED-BYTE-63 SB-VM::SIGNED-BYTE-64 FIXNUM SB-VM::POSITIVE-FIXNUM)"
"((& (- (>> val 7) (>> val 12)) 7))")
(#(23E144A7 60BC6EF6 A245F357 D0F360C2 E56D9B60 FFE7F45F)
"(* COMPLEX-SINGLE-FLOAT COMPLEX-DOUBLE-FLOAT SB-VM::TAGGED-NUM SB-VM::SIGNED-NUM SB-VM::UNSIGNED-NUM)"
"((& (- (>> val 1) (>> val 17)) 7))")
(#(23FD7B36 42D83FFB 8F7912D6 A58F1BE3 C2AEA20D)
"(:ALLOW-OTHER-KEYS :ALLOW-LAMBDA-LIST :CONTEXT :BINDING-FORM-P :LEXENV)"
"((& (- (>> val 7) (>> val 9)) 7))")
(#(2406341A 250B69B8 54A1AE05 54E5314D 6C0D2700)
"#(((:TYPE SB-PRETTY::NEWLINE)) ((:TYPE SB-PRETTY::INDENTATION)) ((:TYPE SB-PRETTY::BLOCK-START)) ((:TYPE SB-PRETTY::BLOCK-END)) ((:TYPE SB-PRETTY::TAB)))"
"((& (+ (>> val 3) (>> val 18)) 7))")
(#(2407FD3F 532B4EA8 62140CF6 731427B9 831D9492 941DAF55 C4834666 DC33E6FC)
"#(:EQ :LT :LE :UNORD :NEQ :NLT :NLE :ORD)"
"((& (- val (>> val 24)) 7))")
(#(2468DEF7 32F372F7 42D83FFB A58F1BE3 EF8EA2F3)
"(:ALLOW-OTHER-KEYS :SIGNAL-VIA :ALLOW-SYMBOL-MACRO :ALLOW-SPECIAL :CONTEXT)"
"((& (^ (>> val 4) (>> val 21)) 7))")
(#(24F3E4FE 99A9F42F D1F36255 EB23EB4A EFF1208B)
"(SB-C::^ + SB-C::>>= SB-C::+= SB-C::^=)"
"((& (- (>> val 2) (>> val 13)) 7))")
(#(25698D2C 32358F36 3EE8EED9 48A2C977 4928B1E4 4D9C0CEA 56B428A2 63C481C2 6B08DE4D 73D42188 7C42A3AB 84BFF3F0 937BB764
9CF559D2 B0E6341F B13C0F00 C1980643 C4F34DDE C6F35104 C7F35297 D0F360C2 D1F36255 D5F368A1 D7F36BC7 E0CC2047 EDCB9528
EF039DEB F71E3E00 FB727973 FF1B2560)
"(ATANH TAN SINH ASIN SIN SQRT FROUND FCEILING FFLOOR FTRUNCATE / * ATAN COS EXP ACOS EXPT ROUND CEILING FLOOR TRUNCATE = > < >= <= ABS EQL - +)"
"((let ((tab #a((16) (unsigned-byte 8) 13 0 0 1 0 0 13 22 0 31 24 21 18 31 16 22)))
(let ((b (& (>> val 11) #xf)))
(let ((a (>> (<< val 6) 28)))
(^ a (aref tab b))))))")
(#(25698D2C 32358F36 4928B1E4 4BCB0101 63C481C2 6A3E03D5 73D42188 9CF559D2 A4528420 B0E6341F CA743403 D0F360C2 D1F36255
D5F368A1 D7F36BC7 EDCB9528 FB727973)
"(SIN FCEILING FFLOOR CEILING FLOOR ASH FTRUNCATE FROUND %UNARY-ROUND %UNARY-TRUNCATE ROUND TRUNCATE / * + - %NEGATE)"
"((let ((tab #a((16) (unsigned-byte 8) 0 1 0 13 0 13 0 5 0 0 0 0 13 0 0 27)))
(let ((b (& val #xf)))
(let ((a (>> val 28)))
(^ a (aref tab b))))))")
(#(25698D2C 4928B1E4 73D42188 937BB764 9CF559D2 A4528420 C1980643 CA743403 D0F360C2 D5F368A1 E0CC2047 EDCB9528)
"(ASH TAN SIN COS FROUND ROUND FTRUNCATE TRUNCATE %UNARY-TRUNCATE / * ABS)"
"((let ((tab #a((8) (unsigned-byte 8) 0 13 0 8 0 2 2 0)))
(let ((b (& (>> val 12) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(2573565B 30BDFB0F 37F10A2F 492D8C72 4B1E6191 6E83974D 7623DD41 89D107E2 AE357493 B4776BAB E78C6BD8 EAD127F1 ED5E7C28
F5F54456 FF53DAE6)
"#(((:TYPE ALIEN-BOOLEAN-TYPE) (:TYPE ALIEN-ENUM-TYPE) (:TYPE ALIEN-INTEGER-TYPE)) ((:TYPE ALIEN-SINGLE-FLOAT-TYPE) (:TYPE ALIEN-DOUBLE-FLOAT-TYPE) (:TYPE ALIEN-FLOAT-TYPE)) ((:TYPE ALIEN-RECORD-TYPE)) ((:TYPE ALIEN-ARRAY-TYPE)) ((:TYPE SB-ALIEN::ALIEN-C-STRING-TYPE)) ((:TYPE ALIEN-POINTER-TYPE)) ((:TYPE ALIEN-FUN-TYPE)) ((:TYPE SB-ALIEN::ALIEN-ALIEN-VALUE-TYPE) (:TYPE SB-ALIEN::ALIEN-MEM-BLOCK-TYPE) (:TYPE SB-ALIEN::ALIEN-SYSTEM-AREA-POINTER-TYPE)) ((:TYPE ALIEN-VALUES-TYPE)))"
"((let ((tab #a((8) (unsigned-byte 8) 2 12 0 5 0 12 12 0)))
(let ((b (& (>> val 3) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(25BB6475 3FCFFA18 42D83FFB 9DB79145 B914ACB5)
"(:ALLOW-OTHER-KEYS :LAST-FORM-RETRIEVED :LAST-LOCATION-RETRIEVED :TOPLEVEL-FORM-INDEX :DEBUG-SOURCE)"
"((& (+ (>> val 3) (>> val 13)) 7))")
(#(2664D2D2 309FB51A 43DA1FC5 80F378DD 95181988 99795732 9D771EE7 AA58D6AB AD7DF3DC B65D66BD D2B54CD1 F1BDA5D0)
"(SAP-REF-8 SIGNED-SAP-REF-8 SAP-REF-16 SIGNED-SAP-REF-16 SAP-REF-32 SIGNED-SAP-REF-32 SAP-REF-64 SIGNED-SAP-REF-64 SAP-REF-SINGLE SAP-REF-DOUBLE SAP-REF-SAP SAP-REF-LISPOBJ)"
"((let ((tab #a((8) (unsigned-byte 8) 0 5 8 12 2 8 0 0)))
(let ((b (& (>> val 1) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(2664D2D2 309FB51A 80F378DD 95181988 99795732 9D771EE7 AA58D6AB AD7DF3DC B65D66BD D2B54CD1)
"(SAP-REF-8 SIGNED-SAP-REF-8 SAP-REF-16 SIGNED-SAP-REF-16 SAP-REF-32 SIGNED-SAP-REF-32 SAP-REF-64 SIGNED-SAP-REF-64 SAP-REF-SAP SAP-REF-LISPOBJ)"
"((let ((tab #a((8) (unsigned-byte 8) 0 12 9 5 3 3 2 0)))
(let ((b (& (>> val 25) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(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 833A59FE 92FE1EC2 CF5ABDAB F28A2060)
"(:DO-NOT-SET :QWORD :DWORD :WORD :BYTE)"
"((& (+ (>> val 1) (>> val 25)) 7))")
(#(27168950 847A59C4 92FE1EC2 B7C3E8EA C17B6FA5 CF5ABDAB F28A2060)
"(:ZWORD :HWORD :OWORD :QWORD :DWORD :WORD :BYTE)"
"((& (^ (>> val 1) (>> val 26)) 7))")
(#(27168950 92FE1EC2 CF5ABDAB F28A2060)
"#(:QWORD :DWORD :WORD :BYTE)"
"((& (>> val 7) 3))")
(#(273B3AD9 2B465CCD 2CC89B6A 37DFA05E 48DDA865 4DC97723 706958FC 7B4C4A1F 7B50A359 9F0CC3B3 CD185500 D36F5171 D3FC44DD
D5F44723 F737F6F1 FA4BD0D1 FA52FE49 FDF8659C)
"(:RESET-UNICODE-P :INTERACTIVE-P :CLOSE :CLEAR-OUTPUT :CLEAR-INPUT :FILE-STRING-LENGTH :FILE-LENGTH :LINE-LENGTH :EXTERNAL-FORMAT :ELEMENT-MODE :ELEMENT-TYPE :SET-FILE-POSITION :GET-FILE-POSITION :CHARPOS :FINISH-OUTPUT :FORCE-OUTPUT :UNREAD :LISTEN)"
"((let ((tab #a((16) (unsigned-byte 8) 15 0 0 0 0 12 0 0 0 15 22 0 15 14 13 27)))
(let ((b (& val #xf)))
(let ((a (>> (<< val 7) 28)))
(^ a (aref tab b))))))")
(#(27DEC9AD 2DF3F329 36F40154 402C2D11 42D83FFB 8F0E568A 9127DEAB B7131B20 C26EC306)
"(:ALLOW-OTHER-KEYS :NDS :L :W :XMMREG-MEM-SIZE :REG-MEM-SIZE :OPCODE-PREFIX :PRINTER :MORE-FIELDS)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 0 4 2 9 1 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(27DEC9AD 2DF3F329 36F40154 42D83FFB 5023D356 591C658C A005BD53 B869BF94 C425F32A)
"(:ALLOW-OTHER-KEYS :VM :IS4 :VVVV :EVEX-W :W :OPCODE-PREFIX :L :REMAINING-BYTES)"
"((let ((tab #a((8) (unsigned-byte 8) 0 5 0 5 0 2 10 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(27DEC9AD 2DF3F329 36F40154 42D83FFB B869BF94)
"(:ALLOW-OTHER-KEYS :OPCODE-PREFIX :EVEX-W :W :L)"
"((& (- val (>> val 15)) 7))")
(#(27DEC9AD 2DF3F329 402C2D11 42D83FFB 8CDBDD0D 8F0E568A 9127DEAB 9B1DBA5A B7131B20 C26EC306)
"(:ALLOW-OTHER-KEYS :DISP-N :NDS :LL :W :XMMREG-MEM-SIZE :REG-MEM-SIZE :OPCODE-PREFIX :PRINTER :MORE-FIELDS)"
"((let ((tab #a((8) (unsigned-byte 8) 5 4 0 4 4 0 11 0)))
(let ((b (& (>> val 2) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(28BA26DE 4067C9DE A6A1DD56 E76579F3)
"(:INVERT :PRESERVE :DOWNCASE :UPCASE)"
"((>> val 30))")
(#(29085F3F 555EA088 8A2CAA21 922EF550 9A26078C)
"(:DISP32 :DISP8 :CS :GS :FS)"
"((& (+ (>> val 3) (>> val 17)) 7))")
(#(29F3ECDD 32F3FB08 38F4047A)
"#(:B :H :S)"
"((& val 3))")
(#(29F3ECDD 32F3FB08 38F4047A 3EF40DEC)
"#(:B :H :S :D)"
"((& (>> val 4) 3))")
(#(2AA5F8BA 5A8E5A04 89DC592F 8EF36E51 9384909E 973E9024 9FA987D3 A22B5571 A43E0FD7 A49305EF A51FC14A B1478F0B B31CDF30
B3775562 BBF9B8CE D31B15E2 D396A1B6 D506BD28 E4157BFC EBD01872)
"(SB-C::NO-DEBUG SB-C::CONSTANT-VALUE SB-C::NO-CONSTRAINTS SB-C::CURRENT-DEFMETHOD SB-ASSEM::FLUSHABLE ENABLE-PACKAGE-LOCKS DISABLE-PACKAGE-LOCKS DYNAMIC-EXTENT UNMUFFLE-CONDITIONS MUFFLE-CONDITIONS OPTIMIZE SB-C::NO-COMPILER-MACRO MAYBE-INLINE NOTINLINE INLINE FTYPE SPECIAL IGNORABLE IGNORE TYPE)"
"((let ((tab #a((16) (unsigned-byte 8) 7 0 0 9 0 0 15 24 30 0 13 26 30 0 13 9)))
(let ((b (& val #xf)))
(let ((a (>> val 28)))
(^ a (aref tab b))))))")
(#(2AA5F8BA 89DC592F 9FA987D3 A22B5571 A49305EF B1478F0B B31CDF30 BBF9B8CE D31B15E2 D506BD28 E4157BFC EBD01872)
"(UNMUFFLE-CONDITIONS MUFFLE-CONDITIONS MAYBE-INLINE NOTINLINE INLINE FTYPE OPTIMIZE IGNORABLE IGNORE TYPE DYNAMIC-EXTENT SPECIAL)"
"((let ((tab #a((8) (unsigned-byte 8) 12 13 0 0 12 0 5 7)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(2AA5F8BA 973E9024 9FA987D3 A43E0FD7 A49305EF D396A1B6 E4157BFC)
"(SPECIAL IGNORABLE IGNORE DYNAMIC-EXTENT SB-C::CONSTANT-VALUE SB-C::NO-CONSTRAINTS SB-C::NO-DEBUG)"
"((& (^ (>> val 9) (>> val 30)) 7))")
(#(2ADEF6D0 32EAE7EB 3EDDB4DB 42D83FFB 5C084D2B 60311FC5 6C414B8A C246F15A CCC01211 D18559DF F26B59C0)
"(:ALLOW-OTHER-KEYS :EMERGENCY-BEST-EFFORT :METHOD-FRAME-STYLE :PRINT-FRAME-SOURCE :ARGUMENT-LIMIT :PRINT-PC :PRINT-THREAD :COUNT :FROM :START :STREAM)"
"((let ((tab #a((8) (unsigned-byte 8) 0 11 5 4 0 5 4 8)))
(let ((b (& (>> val 10) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(2B465CCD 42D83FFB 50BC6DF5 7AEAA371 F26B59C0)
"(:ALLOW-OTHER-KEYS :NULL-TERMINATE :EXTERNAL-FORMAT :END :START)"
"((& (+ (>> val 6) (>> val 23)) 7))")
(#(2B465CCD 42D83FFB 65AA3342 96A5F5BD D9DC5A17)
"(:ALLOW-OTHER-KEYS :EXTERNAL-FORMAT :IF-DOES-NOT-EXIST :PRINT :VERBOSE)"
"((& (^ (>> val 7) (>> val 18)) 7))")
(#(2B465CCD 42D83FFB 6808911B 71FB8EC1 B169B946 DE0A9C1B FA4BD0D1)
"(:ALLOW-OTHER-KEYS :NOT-NULL :ELEMENT-TYPE :EXTERNAL-FORMAT :TO :ALIGNMENT :BITS)"
"((& (^ val (>> val 29)) 7))")
(#(2BD70BB8 429CA013 451B4652 70F422B1 FA9C8A8E)
"(SB-C::%MORE SB-C::%REST SB-C::%OPTIONAL SB-C::%SUPPLIED-P SB-C::%DELETED)"
"((& (+ val (>> val 30)) 7))")
(#(2BF5F421 42D83FFB 4341F7D8 63C971D7 8F7912D6)
"(:ALLOW-OTHER-KEYS :LAMBDA-VAR :FIRED :LEXENV :SOURCE-PATH)"
"((& (- (>> val 1) (>> val 30)) 7))")
(#(2C2B8E55 4D61368F 58110E7F 6D9A883D 742D4C54 74589D82 897B4656 9F7795D1 CE783BB2 EAA3DA5C EEB4A80D FD11F4B0)
"(SB-C::CRETURN SB-C::CIF SB-C::ENTRY SB-C::MV-COMBINATION DELAY SB-C::ARRAY-INDEX-CAST CAST EXIT SB-C::ENCLOSE SB-C::CDYNAMIC-EXTENT SB-C:JUMP-TABLE SB-C::VOP-JUMPER)"
"((let ((tab #a((8) (unsigned-byte 8) 12 14 0 2 0 2 0 5)))
(let ((b (& (>> val 7) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(2C398ABB 31FABC1E 42D83FFB 815C440D AD4575D9 B54A8914)
"(:ALLOW-OTHER-KEYS :VALUES-DOCUMENTATION :DOCUMENTATION :GETTER :EXPRESSION :NAME)"
"((& (+ (>> val 12) (>> val 16)) 7))")
(#(2CA550C6 30BCF1E4 35455F60 9647F466 A1C5FD66)
"(:STACK :UNUSED :UNKNOWN :FIXED :DELAYED)"
"((& (^ (>> val 1) (>> val 15)) 7))")
(#(2CB6FC99 5F6ADF7D 97AEF707 A1CA2A1F E7F70F1A F08AFA38)
"#(COMPILATION-SPEED DEBUG SAFETY SPACE SPEED INHIBIT-WARNINGS)"
"((& (^ (>> val 4) (>> val 14)) 7))")
(#(2D4E6353 3336F7AC 42D83FFB 6634E9C8 DB5C8A6A)
"(:ALLOW-OTHER-KEYS :DONT-SAVE :HANDLE :NAMESTRING :PATHNAME)"
"((& (^ val (>> val 10)) 7))")
(#(2D524721 42D83FFB 4339ECDA B9B79FF6 C4FFE764)
"(:ALLOW-OTHER-KEYS :ARG-INFO :NEXT-METHOD-CALL :PV :FUNCTION)"
"((& (+ (>> val 1) (>> val 10)) 7))")
(#(2DD4199E 42D83FFB 68B83D2D 84D01102 88E8BEBA ECF81B20 EE80FD9D)
"(:ALLOW-OTHER-KEYS :NORMALIZE-ZEROS :HIGH :LOW :COMPLEXP :FORMAT :CLASS)"
"((& (- val (>> val 15)) 7))")
(#(2DF0AB1F 573C9675 5ACE528D CB5B4BC6 D7F08D68)
"(SB-C::MORE REST SB-C::OPTIONAL SB-C::SUPPLIED-P SB-C::DELETED)"
"((& (+ (>> val 6) (>> val 21)) 7))")
(#(2EBA8F8E 45176003 815A1431 8B6F61B4)
"(:UNKNOWN-RETURN-PARTNER :FUN-END :FUN-START :CODE-LOCATION)"
"((& val 3))")
(#(2EF3F4BC 40F29931 5BE2D9A8 7326C3E5 B914ACB5 B973B7A1 BACB2604 C079F3D1 FDC1B640)
"(DEFSTRUCT-SLOT-DESCRIPTION DEFSTRUCT-DESCRIPTION SB-C::DEBUG-SOURCE SB-C::COMPILED-DEBUG-INFO SB-C::DEBUG-INFO SB-C:DEFINITION-SOURCE-LOCATION CONDITION STRUCTURE-OBJECT T)"
"((let ((tab #a((8) (unsigned-byte 8) 0 12 2 5 0 0 7 7)))
(let ((b (>> val 29)))
(let ((a (& val #x7)))
(^ a (aref tab b))))))")
(#(2EF3F4BC 60BC6EF6 7F15A357 80D0C591 92FE1EC2 A245F357 AC841474)
"(COMPLEX-DOUBLE-FLOAT COMPLEX-SINGLE-FLOAT DOUBLE-FLOAT SINGLE-FLOAT SIGNED-WORD WORD T)"
"((& (^ (>> val 4) (>> val 10)) 7))")
(#(2EFA06BE 73D11A29 A3CDD395 B9968386)
"(SB-PCL::READER SB-PCL::WRITER BOUNDP MAKUNBOUND)"
"((& (>> val 3) 3))")
(#(3073B181 42D83FFB 50BC6DF5 ECE52EBC F26B59C0)
"(:ALLOW-OTHER-KEYS :AS-DIRECTORY :JUNK-ALLOWED :END :START)"
"((& (+ val (>> val 7)) 7))")
(#(3073B181 42D83FFB 50BC6DF5 F26B59C0 F87BBA2E)
"(:ALLOW-OTHER-KEYS :JUNK-ALLOWED :RADIX :END :START)"
"((& (^ (>> val 1) (>> val 25)) 7))")
(#(30EAF5B9 31923CDB 42D83FFB 4F9F647F 69348843)
"(:ALLOW-OTHER-KEYS :MUTEX :TEST-FUNCTION :HASH-FUNCTION :STORAGE)"
"((& (^ (>> val 2) (>> val 5)) 7))")
(#(30EAF5B9 31923CDB 42D83FFB 5C084D2B 69348843 720C8616 D4C7B81E)
"(:ALLOW-OTHER-KEYS :COUNT :TOMBSTONES :MUTEX :HASH-FUNCTION :COMPARATOR :STORAGE)"
"((& (- (>> val 4) (>> val 29)) 7))")
(#(30F11E52 42D83FFB 4959D740 4E881FA6 7ECAA706)
"(:ALLOW-OTHER-KEYS :UNWINNAGE-FUN :LOSSAGE-FUN :RESULT-TEST :ARGUMENT-TEST)"
"((& (- val (>> val 6)) 7))")
(#(30FA655D 4A697378 5AB41F21 691ED00E B2B87111 D750C880)
"(SB-C:RETURN-SINGLE RETURN SB-C:KNOWN-RETURN SB-C:TAIL-CALL SB-C:TAIL-CALL-NAMED SB-C:STATIC-TAIL-CALL-NAMED)"
"((& (- (>> val 2) (>> val 13)) 7))")
(#(316FB056 A85F753E E82725CD F3313D8C)
"(SB-C:TN SB-X86-64-ASM::REG SB-X86-64-ASM::EA SB-C:FIXUP)"
"((& (>> val 6) 3))")
(#(319EAA75 42D83FFB 79287F33 87DF5576 A2FD791A A87B625D D6280FBF)
"(:ALLOW-OTHER-KEYS :SUFFIX :PREFIX :BLOCK-END :SECTION-END :DEPTH :POSN)"
"((& (+ val (>> val 3)) 7))")
(#(319EAA75 42D83FFB 7D30DC7C A2FD791A D6280FBF)
"(:ALLOW-OTHER-KEYS :KIND :SECTION-END :DEPTH :POSN)"
"((& (^ (>> val 1) (>> val 10)) 7))")
(#(31B095DD 42D83FFB 4341F7D8 63C971D7 8F7912D6)
"(:ALLOW-OTHER-KEYS :CALLER :FIRED :LEXENV :SOURCE-PATH)"
"((& (+ val (>> val 1)) 7))")
(#(320B0948 4E3391D6 5256235A 6AC11619 A7D5BCEA ED8563BC)
"(SB-VM::FLOAT-REGISTERS SB-VM::IMMEDIATE-CONSTANT CONSTANT SB-C:NON-DESCRIPTOR-STACK SB-VM::CONTROL-STACK SB-VM::REGISTERS)"
"((& (- (>> val 4) (>> val 20)) 7))")
(#(32ADBA95 33CE8BFA BABDB350 D73AF383)
"(:LIVE :READ-ONLY :WRITE :READ)"
"((& val 3))")
(#(32ADBA95 42D83FFB 474D1EE3 6E3707AB A314FDF6 D84A30FD DD1D6422 EAD0F217 F23B71A6)
"(:ALLOW-OTHER-KEYS :READ-ONLY :FOLDER :ANNOTATION :CALL-TYPE-DERIVER :OVERWRITE-FNDB-SILENTLY :RESULT-ARG :OPTIMIZER :DERIVE-TYPE)"
"((let ((tab #a((8) (unsigned-byte 8) 12 0 5 3 7 0 2 0)))
(let ((b (& (>> val 15) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(33FB65F5 42D83FFB 6C414B8A 71FB8EC1 7D30DC7C A788A7AA AD4575D9 B169B946 DE0A9C1B)
"(:ALLOW-OTHER-KEYS :OFFSET :KIND :TO :FROM :NAME :SIGNED :ALIGNMENT :BITS)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 4 0 11 5 5 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(3472E300 42D83FFB 5512BD3E 873646F9 D30281FD D34243B0)
"(:ALLOW-OTHER-KEYS :INTERACTIVE-THREADS-QUEUE :INTERACTIVE-THREADS :THREADS :LOCK :NEW-ENROLLEES)"
"((& (- (>> val 1) (>> val 15)) 7))")
(#(352C3319 3BAA5C56 42D83FFB 84F39EEA 9E5A73AF C0447873 C6FD322D F2F895BA)
"(:ALLOW-OTHER-KEYS :INVALID :BITMAP :INFO :INHERITS :FLAGS :LENGTH :DEPTHOID)"
"((& (^ (>> val 4) (>> val 25)) 7))")
(#(359CB801 4D28C61A 53351B33 A2DD0906 B9B79FF6)
"(FUNCTION SB-IMPL::PREDICATE SB-IMPL::KEY SB-IMPL::TEST SB-IMPL::TEST-NOT)"
"((& (^ (>> val 3) (>> val 6)) 7))")
(#(359CB801 5DAB18D0 625827B9 7D5DAB1C BF38ADF8 C2B3EDA3 C7436840 D2821F1C E391E233 EBD01872 F1F25102)
"(:PURE :INITIAL-OFFSET :NAMED :TYPE :PRINT-OBJECT :PRINT-FUNCTION :INCLUDE :PREDICATE :COPIER :CONSTRUCTOR :CONC-NAME)"
"((let ((tab #a((8) (unsigned-byte 8) 0 5 8 11 4 1 0 5)))
(let ((b (& (>> val 4) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(359CB801 5DAB18D0 7D5DAB1C BF38ADF8 C2B3EDA3 C7436840 D2821F1C E391E233 EBD01872 F1F25102)
"(:PURE :INITIAL-OFFSET :TYPE :PRINT-OBJECT :PRINT-FUNCTION :INCLUDE :PREDICATE :COPIER :CONSTRUCTOR :CONC-NAME)"
"((let ((tab #a((8) (unsigned-byte 8) 0 5 11 0 15 1 0 5)))
(let ((b (& (>> val 4) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(359CB801 5DAB18D0 D2821F1C E391E233)
"(:CONC-NAME :CONSTRUCTOR :COPIER :PREDICATE)"
"((& (>> val 15) 3))")
(#(359CB801 7D5DAB1C BF38ADF8 C2B3EDA3 C7436840 D2821F1C E391E233 EBD01872 F1F25102)
"#(:INCLUDE :INITIAL-OFFSET :PURE :TYPE :CONC-NAME :COPIER :PREDICATE :PRINT-FUNCTION :PRINT-OBJECT)"
"((let ((tab #a((8) (unsigned-byte 8) 0 5 1 11 3 0 0 5)))
(let ((b (& (>> val 4) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(37505980 42E47517 76252622 DB5C8A6A E34C00E1 EBCA1BE4)
"(COMPILED-FUNCTION HASH-TABLE PACKAGE PATHNAME RANDOM-STATE READTABLE)"
"((& (+ (>> val 4) (>> val 18)) 7))")
(#(37505980 42E47517 DB5C8A6A E34C00E1 EBCA1BE4)
"(HASH-TABLE PACKAGE PATHNAME RANDOM-STATE READTABLE)"
"((& (^ (>> val 2) (>> val 30)) 7))")
(#(379EC24E B0932BD7 DBE841E7)
"((ASSOC-IF . ASSOC-IF-NOT) (RASSOC-IF . RASSOC-IF-NOT) (MEMBER-IF . MEMBER-IF-NOT))"
"((^ (>> val 30) 2))")
(#(3836DEFB 6A1FC394 A56E935B AB2C6780 F36C4AC5)
"(:LAYOUT-ID :LAYOUT :IMMOBILE-SYMBOL :SYMBOL-TLS-INDEX :CARD-TABLE-INDEX-MASK)"
"((& (>> val 11) 7))")
(#(38A41582 59A5A571 A2B0ECD5 B9B79FF6)
"(FUNCTION SB-C::GLOBAL-FUNCTION LAMBDA NAMED-LAMBDA)"
"((& (>> val 1) 3))")
(#(38A41582 7CC5F551 9647F466 A49305EF)
"(:UNKNOWN :GLOBAL :GLOBAL-FUNCTION :SPECIAL)"
"((& (^ val (>> val 2)) 3))")
(#(38EAA919 A35DC68D E487643D F5B1443E)
"(FUNCALLABLE-STRUCTURE LIST VECTOR STRUCTURE)"
"((& (>> val 17) 3))")
(#(38F4047A 3BF40933 8C993A9F E8FF8CA3)
"(SB-C::VAL SB-C::NEWVAL SB-C::A SB-C::B)"
"((& (- val (>> val 4)) 3))")
(#(39019F31 629F44EF 69F3BC27 AB9DB7B4 E4C0DDF8)
"#(:BINDS :CALLS :SETS :REFERENCES :MACROEXPANDS)"
"((& (- (>> val 4) (>> val 24)) 7))")
(#(397F3004 3C7F34BD 467F447B 48A2A753 4C7F4DED 7A9A792B 839A8756 8A9A925B 909A9BCD)
"(:SXTX :SXTW :SXTH :SXTB :UXTX :LSL :UXTW :UXTH :UXTB)"
"((let ((tab #a((8) (unsigned-byte 8) 0 12 2 3 7 0 5 6)))
(let ((b (& (>> val 7) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(3C5EFFF8 6E70844A 7AAF3CC2 9A23C247 C1E847AD EA771EC5)
"(SB-C::PROPER-OR-DOTTED-LIST SB-C::PROPER-OR-CIRCULAR-LIST SB-C::PROPER-SEQUENCE SB-C::PROPER-LIST TYPE-SPECIFIER SB-C::MODIFYING)"
"((& (^ (>> val 1) (>> val 13)) 7))")
(#(3C5EFFF8 7AAF3CC2 9A23C247 C1E847AD EA771EC5)
"(SB-C::PROPER-OR-CIRCULAR-LIST SB-C::PROPER-OR-DOTTED-LIST SB-C::PROPER-LIST SB-C::PROPER-SEQUENCE TYPE-SPECIFIER)"
"((& (^ (>> val 5) (>> val 20)) 7))")
(#(3C5EFFF8 7AAF3CC2 C1E847AD EA771EC5)
"(SB-C::PROPER-OR-DOTTED-LIST SB-C::PROPER-OR-CIRCULAR-LIST SB-C::PROPER-SEQUENCE SB-C::PROPER-LIST)"
"((& (>> val 2) 3))")
(#(3D1D902E 43AF52DD 72D6C85E B0D899FE CF5EC8DB)
"(SB-IMPL::|Vector| SB-IMPL::|List*| SB-IMPL::|List| SB-IMPL::|Append| NCONC)"
"((& (- (>> val 11) (>> val 25)) 7))")
(#(3E02DA52 42D83FFB 4D28C61A 50BC6DF5 53351B33 5C084D2B A2DD0906 F26B59C0)
"(:ALLOW-OTHER-KEYS :KEY :COUNT :END :START :TEST-NOT :TEST :FROM-END)"
"((& (+ (>> val 12) (>> val 24)) 7))")
(#(3E02DA52 42D83FFB 4D28C61A 50BC6DF5 53351B33 A2DD0906 F26B59C0)
"(:ALLOW-OTHER-KEYS :KEY :FROM-END :END :START :TEST-NOT :TEST)"
"((& (+ val (>> val 3)) 7))")
(#(3E02DA52 42D83FFB 4D28C61A 53351B33 90FE97F5 91FE9988 A2DD0906 DDA0CD1E E0A0D1D7)
"(:ALLOW-OTHER-KEYS :KEY :END2 :START2 :END1 :START1 :TEST-NOT :TEST :FROM-END)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 12 5 3 2 0 7)))
(let ((b (& (>> val 1) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(3E02DA52 42D83FFB 50BC6DF5 53351B33 5C084D2B F26B59C0)
"(:ALLOW-OTHER-KEYS :COUNT :END :KEY :START :FROM-END)"
"((& (^ (>> val 4) (>> val 10)) 7))")
(#(3E02DA52 42D83FFB 50BC6DF5 53351B33 B0D071CC F26B59C0)
"(:ALLOW-OTHER-KEYS :INITIAL-VALUE :END :START :FROM-END :KEY)"
"((& (+ val (>> val 3)) 7))")
(#(3E02DA52 42D83FFB 50BC6DF5 53351B33 F26B59C0)
"(:ALLOW-OTHER-KEYS :KEY :END :START :FROM-END)"
"((& (>> val 22) 7))")
(#(3EDDB4DB 42D83FFB 5C084D2B 6C414B8A D18559DF F26B59C0)
"(:ALLOW-OTHER-KEYS :METHOD-FRAME-STYLE :FROM :START :ARGUMENT-LIMIT :COUNT)"
"((& (+ (>> val 6) (>> val 21)) 7))")
(#(3EF40DEC 991CAE6F 9E1CB64E B8149077 C60DEABC D10DFC0D D5FEF962 D6D10A2B DFFF0920)
"(:D :|2D| :|1D| :|4S| :|2S| :|8H| :|4H| :|16B| :|8B|)"
"((let ((tab #a((8) (unsigned-byte 8) 14 0 5 4 0 1 4 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(3EF40DEC 991CAE6F 9E1CB64E C60DEABC D10DFC0D D5FEF962 D6D10A2B DFFF0920)
"(:|2D| :D :|4S| :|2S| :|8H| :|4H| :|16B| :|8B|)"
"((& (^ val (>> val 2)) 7))")
(#(3EF40DEC 991CAE6F 9E1CB64E D10DFC0D D5FEF962 D6D10A2B DFFF0920)
"(:D :|4S| :|2S| :|8H| :|4H| :|16B| :|8B|)"
"((& (- (>> val 25) (>> val 29)) 7))")
(#(3F16D452 42D83FFB 60D621C0 C33831B6 D4862A02)
"(:ALLOW-OTHER-KEYS :SOURCE-NAMESTRING :SOURCE-PLIST :POLICY :OVERRIDE)"
"((& (- (>> val 7) (>> val 12)) 7))")
(#(3F296E86 4768303A 550F5A91 55366A01 96A77A7D BF02DCC8 C222027F)
"(:DCZID_EL0 :TPIDRRO_EL0 :TPIDR_EL0 :CCNT :FPSR :FPCR :NZCV)"
"((& (- (>> val 2) (>> val 29)) 7))")
(#(4067C9DE 43DA12EF A68C1A9C E76579F3)
"(:CAPITALIZE-FIRST :CAPITALIZE :DOWNCASE :UPCASE)"
"((& (>> val 16) 3))")
(#(41A93B9F AED60332 CB00D22F)
"((ASSOC-IF . ASSOC-IF-NOT) (RASSOC-IF . RASSOC-IF-NOT) (MEMBER-IF . MEMBER-IF-NOT))"
"((^ (>> val 30) 3))")
(#(41FB9BE8 67CF6BF7 7926D5EE 8A6F713D F85ABB09)
"(:FINAL :NUMERIC :FILTERED :SIGN-EXTENDED :RAW)"
"((& (^ (>> val 6) (>> val 17)) 7))")
(#(42C8F438 42D83FFB 609A1E6B 802AD85A B5FBA0DF BFA1A459 C82C25BB CB5B4BC6 D7F08D68 DA44E4EA)
"(:ALLOW-OTHER-KEYS :DESIGNATOR :RETURNS :WILD-ARGS :ALLOWP :KEYWORDS :KEYP :REST :OPTIONAL :REQUIRED)"
"((let ((tab #a((8) (unsigned-byte 8) 2 12 3 0 0 0 14 4)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(42D83FFB 4341F7D8 63C971D7 7B408880 8F7912D6)
"(:ALLOW-OTHER-KEYS :DEPS :FIRED :LEXENV :SOURCE-PATH)"
"((& (- val (>> val 4)) 7))")
(#(42D83FFB 4341F7D8 63C971D7 7D30DC7C 8F7912D6)
"(:ALLOW-OTHER-KEYS :KIND :FIRED :LEXENV :SOURCE-PATH)"
"((& (- (>> val 5) (>> val 21)) 7))")
(#(42D83FFB 4341F7D8 63C971D7 8F7912D6 A58F1BE3 EBD01872)
"(:ALLOW-OTHER-KEYS :CONTEXT :TYPE :FIRED :LEXENV :SOURCE-PATH)"
"((& (- (>> val 4) (>> val 9)) 7))")
(#(42D83FFB 45D14F18 53351B33 C82C25BB D7F08D68)
"(:ALLOW-OTHER-KEYS :RETURNS :KEY :REST :POSITIONAL)"
"((& (>> val 12) 7))")
(#(42D83FFB 4AC8E54E 5BE94ADF 6190B2E4 6F4B6B30 72C34A8F 819199E6 8F3F7AE8 A2E52CBF C6A86009 E13961AC FFCFEEB7)
"(:ALLOW-OTHER-KEYS :ABORTED :BYTES-CONSED :PAGE-FAULTS :LAMBDAS-CONVERTED :EVAL-CALLS :PROCESSOR-CYCLES :GC-REAL-TIME-MS :GC-RUN-TIME-MS :SYSTEM-RUN-TIME-US :USER-RUN-TIME-US :REAL-TIME-MS)"
"((let ((tab #a((8) (unsigned-byte 8) 0 8 0 5 9 0 8 7)))
(let ((b (& (>> val 10) #x7)))
(let ((a (>> (<< val 3) 29)))
(^ a (aref tab b))))))")
(#(42D83FFB 4D28C61A 5DAB18D0 C057F974 FE80D3EE)
"(:ALLOW-OTHER-KEYS :TEST :SORT :KEY-TYPE :CONSTRUCTOR)"
"((& (- (>> val 2) (>> val 20)) 7))")
(#(42D83FFB 4E8BB4F4 7D30DC7C 9E6D8DE3 AD4575D9 CF9E05CF EA7A4F23)
"(:ALLOW-OTHER-KEYS :SIZE-ALIGNMENT :SIZE-INCREMENT :INDEX :SIZE :KIND :NAME)"
"((& (>> val 13) 7))")
(#(42D83FFB 4E8BB4F4 7E4E1AAC DAEC1DD5 E4D1F085 E6A4B4F0 EBD01872)
"(:ALLOW-OTHER-KEYS :ENCLOSING-OBJECT :VALUE :SLOT-NAME :INDEX :OBJECT :TYPE)"
"((& (- (>> val 14) (>> val 29)) 7))")
(#(42D83FFB 56D2EA8F 5B5C784C 6189AAE9 C69C75C3)
"(:ALLOW-OTHER-KEYS :ERRORP :CLASSIFY-SYMLINKS :DIRECTORIES :FILES)"
"((& (+ val (>> val 8)) 7))")
(#(42D83FFB 581EB11B 7A9BD84A 931C23DC BF7BF790)
"(:ALLOW-OTHER-KEYS :FAST :BODY :INTO :RESULT)"
"((& (^ (>> val 2) (>> val 7)) 7))")
(#(42D83FFB 594313BC 66390A20 7D30DC7C 8F575E80 A6EF69DC AD4575D9 BAFE108A BB62E448 C82C25BB C9AB8F2B D62CDE7F)
"(:ALLOW-OTHER-KEYS :ELSEWHERE-PC :START-PC :BSP-SAVE :CLOSURE-SAVE :RETURNS :ARGUMENTS :TLF-NUMBER :BLOCKS :VARS :KIND :NAME)"
"((let ((tab #a((8) (unsigned-byte 8) 0 14 2 8 4 0 0 2)))
(let ((b (& val #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(42D83FFB 5A95FD85 87F71775 AD4575D9 BFA1A459)
"(:ALLOW-OTHER-KEYS :ALLOWP :TYPES :POSITION :NAME)"
"((& (^ (>> val 5) (>> val 12)) 7))")
(#(42D83FFB 5B8B3DFE 84F39EEA 9812BD4D AD4575D9 E2272EB9 F52FF428)
"(:ALLOW-OTHER-KEYS :SLOTS :VARIABLE-LENGTH-P :LENGTH :LOWTAG :WIDETAG :NAME)"
"((& (>> val 19) 7))")
(#(42D83FFB 5C084D2B 81133902 AD4575D9 BE38A336 E3C13640 F2FF9C61)
"(:ALLOW-OTHER-KEYS :ACTION :LEVEL :COUNT :VAR :DESCRIPTION :NAME)"
"((& (^ (>> val 18) (>> val 26)) 7))")
(#(42D83FFB 5F495633 6C697EEC 85240162 EBD01872 F2F895BA)
"(:ALLOW-OTHER-KEYS :TYPE :ASSERTED-TYPE :DEFINED-HERE :UNKNOWN-KEYS-FUN :INFO)"
"((& (^ (>> val 1) (>> val 6)) 7))")
(#(42D83FFB 60D621C0 94FFD87A B9B79FF6 EBD01872)
"(:ALLOW-OTHER-KEYS :POLICY :IMPORTANT :FUNCTION :TYPE)"
"((& (>> val 24) 7))")
(#(42D83FFB 621DB9DF 70C1F263 9458CA57 C0CB4E00)
"(:ALLOW-OTHER-KEYS :NIL-IN-OTHER-POINTERS :IMMEDIATE-TESTED :VALUE-TN-REF :DROP-THROUGH)"
"((& (- val (>> val 29)) 7))")
(#(42D83FFB 637BBA18 A79F0A54 D25824DE DA44E4EA)
"(:ALLOW-OTHER-KEYS :PATH-KEYWORDS :FOR-KEYWORDS :ITERATION-KEYWORDS :KEYWORDS)"
"((& (^ (>> val 3) (>> val 12)) 7))")
(#(42D83FFB 71FB8EC1 7D30DC7C AD4575D9 AFAC50C3 B169B946)
"(:ALLOW-OTHER-KEYS :FIELDS :NAME :KIND :ALIGNMENT :BITS)"
"((& (^ val (>> val 30)) 7))")
(#(42D83FFB 71FB8EC1 9E6D8DE3 B8BBE117 FB0112B4)
"(:ALLOW-OTHER-KEYS :MEMORY-P :ALIGNMENT :SIZE :REGISTER-SLOTS)"
"((& (- (>> val 3) (>> val 22)) 7))")
(#(42D83FFB 71FB8EC1 B169B946 FA4BD0D1 FFD54E0F)
"(:ALLOW-OTHER-KEYS :DIMENSIONS :ELEMENT-TYPE :ALIGNMENT :BITS)"
"((& (- (>> val 11) (>> val 21)) 7))")
(#(42D83FFB 747E276F 8C20D4F1 90B6CEEA A793DF15)
"(:ALLOW-OTHER-KEYS :SO-DATA :SO-KEY :NODE-HASH :%NODE-NEXT)"
"((& (- (>> val 3) (>> val 10)) 7))")
(#(42D83FFB 90FE97F5 91FE9988 DDA0CD1E E0A0D1D7)
"(:ALLOW-OTHER-KEYS :END2 :START2 :END1 :START1)"
"((& (+ val (>> val 8)) 7))")
(#(42D83FFB 98F3A192 B66E98EA B9485E2B BFF01E77 E006641B E3DD2F1F)
"(:ALLOW-OTHER-KEYS :SLOT-NAMES :METACLASS-CONSTRUCTOR :DD-TYPE :METACLASS-NAME :SUPERCLASS-NAME :CLASS-NAME)"
"((& (^ (>> val 1) (>> val 20)) 7))")
(#(42D83FFB A58F1BE3 B551D38C DF61E816 F90922BB)
"(:ALLOW-OTHER-KEYS :SILENT :CONDITION-CLASS :ACCEPT :CONTEXT)"
"((& (^ (>> val 3) (>> val 4)) 7))")
(#(42D83FFB AD4575D9 B7207020 BF3BEF40 C8317BFE D5F71886)
"(:ALLOW-OTHER-KEYS :PROTOTYPE :LAMBDA-LIST :SIGNEDP :WIDTH :NAME)"
"((& (- (>> val 6) (>> val 29)) 7))")
(#(4397A057 6324535E 64F67ABB B6FE7D1C B9968386)
"(MAKUNBOUND DEFCONSTANT COMPARE-AND-SWAP PROGV SET)"
"((& (^ (>> val 3) (>> val 5)) 7))")
(#(43AF52DD 72D6C85E E487643D F5B1443E)
"(SB-IMPL::|List| LIST SB-IMPL::|Vector| VECTOR)"
"((& (>> val 20) 3))")
(#(4455E0B4 502EE428 5058322F 531D9FC0 5B155D93 71DECFF1 8F70B3E1 9070B574)
"#(:RNE :RTZ :RDN :RUP :RMM :UNUSED1 :UNUSED2 :DYNAMIC)"
"((& (- (>> val 1) (>> val 14)) 7))")
(#(4503BB3B 50C23A77 8EFF6827 E5E8B47F F31FD5F8)
"(:MANDATORY :LITERAL :MISER :FILL :LINEAR)"
"((& (+ val (>> val 9)) 7))")
(#(46F0B1CF 60BC6EF6 75B31507 7750373E 80D0C591 A245F357 A77EB735 A8262B71 ABF50F40 AC841474 BEF0B826 CFE6BA49 D6F62294)
"(SIMD-PACK-512-DOUBLE SIMD-PACK-512-SINGLE SIMD-PACK-512-INT SIMD-PACK-256-DOUBLE SIMD-PACK-256-SINGLE SIMD-PACK-256-INT SIMD-PACK-DOUBLE SIMD-PACK-SINGLE SIMD-PACK-INT COMPLEX-DOUBLE-FLOAT COMPLEX-SINGLE-FLOAT DOUBLE-FLOAT SINGLE-FLOAT)"
"((let ((tab #a((8) (unsigned-byte 8) 5 13 15 0 0 8 3 7)))
(let ((b (& (>> val 27) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(4899E277 52383212 712E187F AEF17DD1 C37C7C73 C53C5D56 D3880CF4 E456475A ECDCC3EF)
"(&ALLOW-OTHER-KEYS &AUX &BODY &ENVIRONMENT &KEY &MORE &OPTIONAL &REST &WHOLE)"
"((let ((tab #a((8) (unsigned-byte 8) 0 13 2 0 2 0 7 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(4899E277 52383212 712E187F AEF17DD1 C37C7C73 C53C5D56 D3880CF4 ECDCC3EF)
"(&WHOLE &BODY &ENVIRONMENT &AUX &ALLOW-OTHER-KEYS &KEY &MORE &REST)"
"((& (^ val (>> val 2)) 7))")
(#(48CD29AE 56B428A2 5B95FF18 6B08DE4D B6FE7D1C C4F34DDE C6F35104 C7F35297 EF039DEB)
"(SET SB-C::EQUALITY EQL <= >= = > < TYPEP)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 2 15 0 2 5 2)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(4928B1E4 63C481C2 73D42188 B0E6341F)
"(:TRUNCATE :CEILING :FLOOR :ROUND)"
"((& (>> val 1) 3))")
(#(4A8C210D C6B4780F E48D4754 F58C39E7)
"(:BIVALENT SIGNED-BYTE UNSIGNED-BYTE CHARACTER)"
"((& (- val (>> val 5)) 3))")
(#(4AFE864E 64F3EC9B 686508A6 6B650D5F 9C117DC2 A11BBD24 B72C7D24 E80678B2 EEBA0CC8)
"(:SIMPLE-= :SIMPLE-SUBTYPEP :SIMPLE-UNION2 :SIMPLE-INTERSECTION2 :COMPLEX-SUBTYPEP-ARG2 :UNPARSE :SINGLETON-P :NEGATE :COMPLEX-SUBTYPEP-ARG1)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 0 8 0 1 0 0)))
(let ((b (& (>> val 1) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(50C23A77 8EFF6827 E5E8B47F F31FD5F8)
"(:MANDATORY :MISER :FILL :LINEAR)"
"((& (>> val 14) 3))")
(#(5122FCBD 5623049C 84006A45 89007224)
"(:NFKC :NFC :NFKD :NFD)"
"((& (>> val 4) 3))")
(#(517AB2CE 7A827660 7FC1A890 A32D1CBD E9B52044)
"(SB-VM::DATA-VECTOR-REF-WITH-OFFSET/SIMPLE-VECTOR-C SLOT %RAW-INSTANCE-REF/SIGNED-WORD %RAW-INSTANCE-REF/WORD SB-VM::INSTANCE-INDEX-REF-C)"
"((& (+ (>> val 8) (>> val 9)) 7))")
(#(52383212 C53C5D56 D3880CF4 E456475A ECDCC3EF)
"(&KEY &BODY &REST &AUX &OPTIONAL)"
"((& (+ val (>> val 8)) 7))")
(#(5256235A 87C835DD E0AD3E74 ED8563BC F7158E95)
"((SB-VM::DESCRIPTOR-REG . 0) (SB-VM::CONTROL-STACK . 1) (SB-VM::SIGNED-REG . 2) (CONSTANT . 3) (SB-VM::ANY-REG . 4))"
"((& (+ val (>> val 2)) 7))")
(#(5256235A 87C835DD E0AD3E74 F7158E95)
"((SB-VM::DESCRIPTOR-REG . 0) (SB-VM::ANY-REG . 1) (SB-VM::SIGNED-REG . 2) (CONSTANT . 3))"
"((& (>> val 7) 3))")
(#(5411B855 56B428A2 6E999239 831B55FB BDD50DB7 ECF81B20)
"(EQL SB-PCL::CLASS-EQ CLASS OR AND NOT)"
"((& (>> val 1) 7))")
(#(5411B855 56B428A2 6E999239 B3A0775E BDD50DB7 ECF81B20)
"(CLASS SB-PCL::CLASS-EQ SB-PCL::WRAPPER-EQ EQL AND NOT)"
"((& (^ (>> val 5) (>> val 31)) 7))")
(#(54D53330 56B428A2 B40D5AD7 DC33E6FC E611D6DF)
"(EQ EQL EQUAL CHAR= CHAR-EQUAL)"
"((& (- val (>> val 10)) 7))")
(#(54D53330 56B428A2 C7F35297 EC9FE1B2)
"(= EQL EQUAL EQUALP)"
"((& (>> val 8) 3))")
(#(54D53330 56B428A2 DC33E6FC E611D6DF)
"(EQ EQL EQUAL CHAR=)"
"((& (>> val 1) 3))")
(#(54D53330 56B428A2 DC33E6FC EC9FE1B2)
"#(EQ EQL EQUAL EQUALP)"
"((& (>> val 8) 3))")
(#(55864167 79E82C53 96BB0EEC BF7BF790 DC6604C1)
"(:FAST-SAFE :FAST :SMALL-SAFE :SMALL :SAFE)"
"((& (- val (>> val 22)) 7))")
(#(55D24E04 636DB542 930DF36A B551D38C C2B36623 C51A470F E76EBABE)
"(SB-PCL::CONDITION-CLASS STRUCTURE-CLASS SB-PCL:SYSTEM-CLASS BUILT-IN-CLASS SB-MOP:FUNCALLABLE-STANDARD-CLASS STANDARD-CLASS SB-PCL::SLOT-CLASS)"
"((& (- (>> val 3) (>> val 28)) 7))")
(#(55D24E04 636DB542 B551D38C C2B36623 E76EBABE)
"(STANDARD-CLASS SB-MOP:FUNCALLABLE-STANDARD-CLASS STRUCTURE-CLASS SB-PCL::CONDITION-CLASS SB-PCL::SLOT-CLASS)"
"((& (^ (>> val 4) (>> val 17)) 7))")
(#(56B428A2 5B95FF18 62AAD219 6B08DE4D 80E75737 C4F34DDE C6F35104 C7F35297 DC33E6FC EF039DEB)
"(= >= <= > < EQL EQ SB-C::%INSTANCE-TYPEP %TYPEP TYPEP)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 14 14 0 2 1 0)))
(let ((b (& val #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(56B428A2 6B08DE4D B40D5AD7 C4F34DDE C6F35104 C7F35297 DC33E6FC E611D6DF EF039DEB)
"(>= <= > < = EQL EQ CHAR-EQUAL CHAR=)"
"((let ((tab #a((8) (unsigned-byte 8) 8 2 0 0 2 3 5 7)))
(let ((b (& (>> val 9) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(56B428A2 6B08DE4D C4F34DDE C6F35104 C7F35297 DC33E6FC)
"(> = EQL EQ <= <)"
"((& (- (>> val 6) (>> val 13)) 7))")
(#(56B428A2 6B08DE4D C4F34DDE C6F35104 C7F35297 DC33E6FC EF039DEB)
"(>= <= > < EQL EQ =)"
"((& (+ (>> val 8) (>> val 11)) 7))")
(#(56B428A2 6B08DE4D C6F35104 C7F35297 DC33E6FC)
"(= EQL EQ <= <)"
"((& (+ val (>> val 14)) 7))")
(#(56B428A2 B40D5AD7 DC33E6FC E611D6DF)
"(EQL EQ CHAR= CHAR-EQUAL)"
"((& (>> val 11) 3))")
(#(56B428A2 BDD50DB7 D5F71886 ECF81B20)
"(CLASS SB-PCL::PROTOTYPE SB-PCL::CLASS-EQ EQL)"
"((& (+ val (>> val 1)) 3))")
(#(56B428A2 C4F34DDE C6F35104 C7F35297 DC33E6FC EF039DEB)
"(< = EQL EQ >= >)"
"((& (+ val (>> val 10)) 7))")
(#(56B428A2 C4F34DDE C7F35297 DC33E6FC EF039DEB)
"(= EQL EQ >= >)"
"((& (^ val (>> val 15)) 7))")
(#(58110E7F 67EE2D1A 6D9A883D 897B4656 A68A3965 CE783BB2 EAA3DA5C)
"#(((:TYPE SB-C::REF)) ((:TYPE DELAY) (:TYPE SB-C::ARRAY-INDEX-CAST) (:TYPE CAST)) ((:TYPE SB-C::COMBINATION)) ((:TYPE SB-C::ENTRY)) ((:TYPE SB-C::ENCLOSE)))"
"((& (^ val (>> val 29)) 7))")
(#(5A6099A2 60BC6EF6 80D0C591 AC841474 B169B946 ED1A6A72)
"(:COMPLEX-SINGLE-FLOAT :DOUBLE-FLOAT :SINGLE-FLOAT :BITS :CHAR :TAGGED)"
"((& (- val (>> val 28)) 7))")
(#(5DBEE1CC 62B68C07 A24AA20E A2BAE11F E86FEA63)
"(:COVERAGE-MARKS :KNOWN-FUN :FDEFINITION :LOAD-TIME-VALUE :ENTRY)"
"((& (^ val (>> val 18)) 7))")
(#(60BC6EF6 6423B68D 80D0C591 A245F357 AC841474)
"(SIMD-PACK COMPLEX-DOUBLE-FLOAT COMPLEX-SINGLE-FLOAT DOUBLE-FLOAT SINGLE-FLOAT)"
"((& (^ val (>> val 7)) 7))")
(#(60BC6EF6 75B31507 80D0C591 A245F357 A77EB735 A8262B71 ABF50F40 AC841474 BEF0B826 D6F62294)
"(SIMD-PACK-512-SINGLE SIMD-PACK-512-DOUBLE SIMD-PACK-512-INT SIMD-PACK-256-DOUBLE SIMD-PACK-256-SINGLE SIMD-PACK-256-INT COMPLEX-DOUBLE-FLOAT COMPLEX-SINGLE-FLOAT DOUBLE-FLOAT SINGLE-FLOAT)"
"((let ((tab #a((8) (unsigned-byte 8) 0 12 0 0 5 3 4 7)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(63C481C2 6A3E03D5 73D42188 A4528420 D0F360C2 D1F36255 D5F368A1 D7F36BC7)
"(FLOOR * ASH TRUNCATE / %NEGATE + -)"
"((& (- val (>> val 12)) 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))")
(#(6A3E03D5 A4528420 D0F360C2 D1F36255 D5F368A1 D7F36BC7)
"(* ASH / %NEGATE + -)"
"((& (^ (>> val 6) (>> val 27)) 7))")
(#(6A3E03D5 A4528420 D0F360C2 D1F36255 D7F36BC7)
"(ASH * %NEGATE + -)"
"((& (+ (>> val 1) (>> val 6)) 7))")
(#(6B08DE4D C4F34DDE C6F35104 C7F35297 EF039DEB)
"(<= < >= > =)"
"((& (+ val (>> val 10)) 7))")
(#(6B08DE4D C4F34DDE C6F35104 EF039DEB)
"(< <= > >=)"
"((& val 3))")
(#(75E7305A 80D0C591 AC841474 B9B79FF6 C49039A2 E487643D F5B1443E)
"(FUNCTION LIST SIMPLE-VECTOR VECTOR FLOAT DOUBLE-FLOAT SINGLE-FLOAT)"
"((& (^ (>> val 4) (>> val 17)) 7))")
(#(75FB05B6 87C835DD 9DD07497 E0AD3E74 F7158E95)
"(SB-VM::SAP-REG SB-VM::SIGNED-REG SB-VM::UNSIGNED-REG SB-VM::ANY-REG SB-VM::DESCRIPTOR-REG)"
"((& (^ (>> val 3) (>> val 15)) 7))")
(#(7709F9F6 7809FB89 7909FD1C 7F5064C5)
"#(:NTA :T0 :T1 :T2)"
"((& (>> val 3) 3))")
(#(77C40F86 80576A93 B9B79FF6 CD2CAFA0 ED33AAA6)
"(:SECTION :FUNCTION :GENERIC-FUNCTION :INITIALIZATION :READERS)"
"((& (^ (>> val 1) (>> val 4)) 7))")
(#(781488E5 831D9492 8A059AB1 8A1D9F97 8A25EE5C 9214B1D3 941DAF55 952EFA09 9A05B3E1 9A26078C 9E1DBF13 A42F11A6 C420397C
C8198403 DB000A06 DC33E6FC E12AF47F)
"((:EQ . 0) (:NE . 1) (:HS . 2) (:CS . 2) (:LO . 3) (:CC . 3) (:MI . 4) (:PL . 5) (:VS . 6) (:VC . 7) (:HI . 8) (:LS . 9) (:GE . 10) (:LT . 11) (:GT . 12) (:LE . 13) (:AL . 14))"
"((let ((tab #a((16) (unsigned-byte 8) 1 7 1 15 0 3 16 3 0 12 12 14 14 10 13 2)))
(let ((b (& (>> val 6) #xf)))
(let ((a (>> (<< val 31) 28)))
(^ a (aref tab b))))))")
(#(7B0749E6 A7171179 B926F0BC E331AF48 E46D7E02)
"(QUOTE :COND :IF :WHEN :UNLESS)"
"((& (^ (>> val 3) (>> val 25)) 7))")
(#(7CC5F551 A42EDADD A49305EF B1478F0B B31CDF30 BBF9B8CE BFA65DEC D506BD28 EBD01872)
"(MAYBE-INLINE NOTINLINE INLINE TYPE FTYPE END-BLOCK START-BLOCK GLOBAL SPECIAL)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 0 13 5 4 7 1)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(7D043EF9 C57F8794 C61E305E EFA9DE6B)
"(SB-VM::SPLAT-WORD SB-VM::SPLAT-SMALL SB-VM::SPLAT-ANY SB-VM::SPLAT)"
"((& val 3))")
(#(7D79BB17 822301E9 94AB411F A806FCD7 EDDACDA4)
"(SB-VM::UNDEFINED-TRAMP SB-VM::UNDEFINED-ALIEN-TRAMP SB-VM::RETURN-VALUES-LIST SB-VM::CALL-SYMBOL SB-C:UNWIND)"
"((& (>> val 23) 7))")
(#(8A165721 9AB9061B B5FBA0DF CB5B4BC6 CB5C01D1 D7F08D68)
"(:MORE-COUNT :MORE-CONTEXT :REST :KEYWORD :OPTIONAL :REQUIRED)"
"((& (^ val (>> val 12)) 7))")
(#(8BD63E3B A45D9F5E D1AAA153 D9E47BF0 E487643D F5B1443E)
"(%MAKE-LIST MAKE-ARRAY VECTOR-SUBSEQ SUBSEQ VECTOR LIST)"
"((& (- val (>> val 30)) 7))")
(#(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))")
(#(937BB764 A4528420 D0F360C2 D1F36255 D7F36BC7)
"(ABS ASH * - +)"
"((& (- val (>> val 1)) 7))")
(#(940C9427 9D1675BD B5CAB0CC FA91B005)
"(:UNSAFE-DEFAULT :SAFE-DEFAULT :UNBOUND :TRAP)"
"((& (>> val 17) 3))")
(#(98A9616D B39B1FAB CA8CA715 CC2284AB DE0A9C1B)
"(:BY :BELOW :ABOVE :DOWNTO :TO)"
"((& (+ (>> val 3) (>> val 19)) 7))")
(#(991CAE6F 9E1CB64E B8149077 C60DEABC D10DFC0D D5FEF962 D6D10A2B DFFF0920)
"(:|2D| :|1D| :|4S| :|2S| :|8H| :|4H| :|16B| :|8B|)"
"((& (+ (>> val 4) (>> val 27)) 7))")
(#(991CAE6F 9E1CB64E C60DEABC D10DFC0D D5FEF962 D6D10A2B DFFF0920)
"(:|2D| :|4S| :|2S| :|8H| :|4H| :|16B| :|8B|)"
"((& (^ val (>> val 2)) 7))")
(#(991CAE6F 9E1CB64E D10DFC0D D5FEF962 D6D10A2B DFFF0920)
"(:|4S| :|2S| :|8H| :|4H| :|16B| :|8B|)"
"((& (+ (>> val 4) (>> val 16)) 7))")
(#(991CAE6F 9E1CB64E D5FEF962 D6D10A2B DFFF0920)
"(:|4S| :|8H| :|4H| :|16B| :|8B|)"
"((& (- val (>> val 2)) 7))")
(#(9E17034E 9E5DB7A4 A8673AFB B2319BAE)
"(:PROBE :IO :OUTPUT :INPUT)"
"((& (>> val 21) 3))")
(#(9E1CB64E D5FEF962 D6D10A2B DFFF0920)
"(:|8H| :|4H| :|16B| :|8B|)"
"((& (>> val 16) 3))")
(#(9F1704E1 D20B4DC0 DD4AE0BB EB0CDFDC)
"(:IN :COPY :OUT :IN-OUT)"
"((& (>> val 4) 3))")
(#(A49305EF D0241AE7 E55E7F8C EE9A5410)
"(SB-PCL::%CLASS SB-PCL::%PARAMETER SB-PCL::%VARIABLE-REBINDING SPECIAL)"
"((& (>> val 8) 3))")
(#(22799ABB 2CA550C6 30BCF1E4 35455F60 9647F466 A1C5FD66)
"(:PASS-THROUGH :STACK :UNUSED :UNKNOWN :FIXED :DELAYED)"
"((& (- val (>> val 24)) 7))")
(#(22799ABB 9647F466 A1C5FD66 A309B799 EB45269C)
"(:UNBOXED :TAIL :PASS-THROUGH :UNKNOWN :FIXED)"
"((& (^ (>> val 4) (>> val 16)) 7))")
(#(37D0286E 58110E7F 67EE2D1A 6D9A883D 897B4656 A68A3965 EAA3DA5C)
"#(((:TYPE SB-C::ENTRY) (:TYPE BIND) (:TYPE DELAY) (:TYPE SB-C::ARRAY-INDEX-CAST) (:TYPE CAST) (:TYPE SB-C::REF)) ((:TYPE SB-C::COMBINATION)))"
"((& (+ (>> val 4) (>> val 15)) 7))")
(#(22799ABB 2CA550C6 30BCF1E4 35455F60 9647F466 A1C5FD66 A32BCE23)
"(:DIRECT :PASS-THROUGH :STACK :UNUSED :UNKNOWN :FIXED :DELAYED)"
"((& (>> val 7) 7))")
(#(67AF46F4 8216D041 E111A059 EE1EF1D5)
"(SB-ASSEM:.ALIGN SB-ASSEM:.BYTE SB-ASSEM:.SKIP SB-ASSEM:.LISPWORDS)"
"((& (>> val 12) 3))")
(#(63C481C2 6A3E03D5 73D42188 937BB764 A4528420 D0F360C2 D1F36255 D5F368A1 D7F36BC7)
"(ABS FLOOR * ASH TRUNCATE / %NEGATE + -)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 4 0 12 2 0 6)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(6A3E03D5 73D42188 937BB764 A4528420 D0F360C2 D1F36255 D5F368A1 D7F36BC7)
"(ABS * ASH TRUNCATE / %NEGATE + -)"
"((& (- val (>> val 28)) 7))")
(#(56B428A2 C4F34DDE C6F35104 C7F35297 DC33E6FC)
"(> < = EQL EQ)"
"((& (^ (>> val 2) (>> val 7)) 7))")
)
;; EOF
Reference in a new issue View git blame Copy permalink