forked from sbcl/sbcl
-
Notifications
You must be signed in to change notification settings - Fork 0
/
xperfecthash61.lisp-expr
1430 lines (1430 loc) · 85.4 KB
/
xperfecthash61.lisp-expr
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
(
(#(0 1 2 4 5 6 C 10 14 18 1F)
"(1 5 0 2 24 12 6 4 20 16 31)"
"((let ((tab #a((8) (unsigned-byte 8) 0 8 2 0 0 8 11 0)))
(let ((b (& val #x7)))
(let ((a (>> (<< val 27) 29)))
(^ a (aref tab b))))))")
(#(0 1 5 6 7 8 F)
"(8 7 0 15 1 5 6)"
"((let ((tab #a((4) (unsigned-byte 8) 0 4 7 0)))
(let ((b (& val #x3)))
(let ((a (>> (<< val 28) 30)))
(^ a (aref tab b))))))")
(#(0 1 7 8 F)
"(15 8 7 1 0)"
"((let ((tab #a((4) (unsigned-byte 8) 0 4 0 0)))
(let ((b (& val #x3)))
(let ((a (>> (<< val 28) 30)))
(^ a (aref tab b))))))")
(#(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
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 DB121C2 52B126B3 53D924E0 E450DECD)
"(NIL :FROB-NFP :LOAD-RETURN-PC :LOAD-OLD-FP :LOAD-NARGS)"
"( (& (^ (>> val 1) (>> val 7)) 7))")
(#(0 DB121C2 53D924E0 9EE57DB1 B05D4415 C92447CE)
"(NIL :LOAD-FP :SAVE-FP :FROB-NFP :COMP-LRA :LOAD-NARGS)"
"( (& (+ (>> val 3) (>> val 4)) 7))")
(#(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 15E4F99C 1FE5095A 23E50FA6 395D0938 3A5D0ACB 44753DB6 475D1F42 57D67C70 61C75C2C 65D6927A 67A567F2 69D698C6 6A97EAE8
789821D4 7BC819B0 B09CD648 B675D04A)
"#(:BO-DNZF :BO-DNZFP :BO-DZF :BO-DZFP :BO-F :BO-FP NIL NIL :BO-DNZT :BO-DNZTP :BO-DZT :BO-DZTP :BO-T :BO-TP NIL NIL :BO-DNZ :BO-DNZP :BO-DZ :BO-DZP :BO-U NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL)"
"((let ((tab #a((16) (unsigned-byte 8) 0 0 0 0 7 7 15 13 0 0 15 31 0 21 11 3)))
(let ((b (& (>> val 3) #xf)))
(let ((a (>> (<< val 7) 28)))
(^ a (aref tab b))))))")
(#(0 16124E24 A3BC72D2 F1B13DF2)
"(NIL :FAIL :DEFER :LISP)"
"( (& (>> val 4) 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 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 2AFFE954 35870C8A C9EACDAD)
"(:UNSPECIFIC :WILD :NEWEST NIL)"
"( (& (>> val 2) 3) )")
(#(0 2C62CDF1 2FBB375F 57DA1CEC 7E1E0B08 EA6D3871)
"(NIL :RESULT-TYPES :CONDITIONAL :ARG-TYPES :ARG-CHECK :GUARD)"
"( (& (+ (>> val 6) (>> val 14)) 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 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 35870C8A 67514124 C9EACDAD)
"(:UNC :WILD :UNSPECIFIC NIL)"
"( (& (>> val 2) 3) )")
(#(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 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))")
(#(1 2 8 10 40)
"(64 16 8 2 1)"
"( (& (+ (>> val 0) (>> val 1) (>> val 5)) 7))")
(#(2 3 5 8 C E)
"(12 3 2 14 5 8)"
"((let ((tab #a((4) (unsigned-byte 8) 7 0 0 2)))
(let ((b (& val #x3)))
(let ((a (>> (<< val 28) 30)))
(^ a (aref tab b))))))")
(#(2 3 5 C E)
"(12 3 2 14 5)"
"((let ((tab #a((4) (unsigned-byte 8) 7 0 0 2)))
(let ((b (& val #x3)))
(let ((a (>> (<< val 28) 30)))
(^ a (aref tab b))))))")
(#(2 3 6 8 C E)
"(12 3 2 14 6 8)"
"((let ((tab #a((4) (unsigned-byte 8) 7 0 0 2)))
(let ((b (& val #x3)))
(let ((a (>> (<< val 28) 30)))
(^ a (aref tab b))))))")
(#(2 3 8 9 C E)
"(12 3 2 14 8 9)"
"((let ((tab #a((4) (unsigned-byte 8) 7 0 0 1)))
(let ((b (& val #x3)))
(let ((a (>> (<< val 28) 30)))
(^ a (aref tab b))))))")
(#(2 3 8 C E)
"(12 3 2 14 8)"
"((let ((tab #a((4) (unsigned-byte 8) 3 0 4 1)))
(let ((b (& (>> val 1) #x3)))
(let ((a (>> (<< val 31) 30)))
(^ a (aref tab b))))))")
(#(A 3C 3F 5B 7B)
"(#\\? #\\{ #\\[ #\\< #\\Newline)"
"((let ((tab #a((4) (unsigned-byte 8) 5 0 0 0)))
(let ((b (& val #x3)))
(let ((a (>> (<< val 25) 30)))
(^ a (aref tab b))))))")
(#(23 27 2B 2C 2D 3A 40 56 76)
"(#\\@ #\\: #\\, #\\' #\\# #\\V #\\v #\\- #\\+)"
"((let ((tab #a((8) (unsigned-byte 8) 0 2 0 0 4 0 10 0)))
(+= val #x1679e37f)
(^= val (>> val 4))
(let ((b (& val #x7)))
(let ((a (>> (u32+ val (<< val 25)) 29)))
(^ a (aref tab b))))))")
(#(44 45 46 4C 52 53)
"(#\\R #\\L #\\D #\\F #\\S #\\E)"
"((let ((tab #a((4) (unsigned-byte 8) 4 3 0 3)))
(let ((b (& val #x3)))
(let ((a (>> (<< val 27) 30)))
(^ a (aref tab b))))))")
(#(89 8D 91 95 99 9D A1 A5 A9 AD B1 B5 B9 BD C1 C5 C9 CD D1 D5 D9 DD E1 E5)
"(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 2) #xf)))
(let ((a (>> (<< val 25) 28)))
(^ a (aref tab b))))))")
(#(89 B1 B5 B9 C9 CD D5 D9)
"(217 205 201 185 181 177 213 137)"
"((let ((tab #a((4) (unsigned-byte 8) 7 0 3 7)))
(+= val #x14650a3e)
(^= val (>> val 4))
(let ((b (& (>> val 1) #x3)))
(let ((a (>> (u32+ val (<< val 26)) 30)))
(^ a (aref tab b))))))")
(#(89 B9 CD D1 D5 D9 DD)
"(221 217 213 209 205 185 137)"
"((let ((tab #a((4) (unsigned-byte 8) 0 2 7 5)))
(+= val #x612d0929)
(^= val (>> val 4))
(let ((b (& (>> val 2) #x3)))
(let ((a (>> (u32+ val (<< val 24)) 30)))
(^ a (aref tab b))))))")
(#(8D 91 95 9D A5 AD B9 BD C1 C5 CD E1 E5)
"(205 197 193 189 185 173 165 157 149 145 229 225 141)"
"((let ((tab #a((8) (unsigned-byte 8) 13 0 0 8 4 1 4 0)))
(let ((b (& (>> val 2) #x7)))
(let ((a (>> (<< val 25) 29)))
(^ a (aref tab b))))))")
(#(1000 2000 4000 6000 8000 A000 C000)
"(4096 40960 49152 32768 24576 16384 8192)"
"( (& (>> val 13) 7))")
(#(496B63 CC3F85F 25536920 42D83FFB 5184FA9F 5D31FE91 5DBEE1CC 63C971D7 8715C70F 8F7912D6 A042AA17 DAEC1DD5 FE632C36)
"(:ALLOW-OTHER-KEYS :NLX-INFO :VALUE :ENTRY :LVAR :DERIVED-TYPE :TAIL-P :SOURCE-PATH :LEXENV :PREV :NEXT :REOPTIMIZE :NUMBER)"
"((let ((tab #a((8) (unsigned-byte 8) 5 0 0 14 12 15 0 10)))
(let ((b (>> val 29)))
(let ((a (& val #x7)))
(^ a (aref tab b))))))")
(#(496B63 42D83FFB 67CE129D A2B0ECD5 F2F895BA)
"(:ALLOW-OTHER-KEYS :INFO :NLX-INFO :CLOSURE :LAMBDA)"
"( (& (+ val (>> val 2)) 7))")
(#(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))))))")
(#(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 805A8CE D64C851 207E1321 26568C99 2870F40D 2B465CCD 2CC89B6A 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 E57CFC3F E6B647A0
F087745E F5306542 FA4BD0D1 FCFE2013)
"(:ALLOW-OTHER-KEYS :FORM-START-CHAR-POS :FORM-START-BYTE-POS :LAST-NEWLINE :NEWLINES :OBSERVER :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 :CSIZE-BUFFER :CIN-BUFFER :IN-BUFFER)"
"((let ((tab #a((32) (unsigned-byte 8) 28 51 51 51 0 49 61 0 9 2 9 49 28 0 7 38 62 0 27 0 6 0 0 0 0 9 49 0 0 0 0 0)))
(let ((b (& (>> val 7) #x1f)))
(let ((a (>> (<< val 9) 27)))
(^ a (aref tab b))))))")
(#(15115EA 805D985 DBAFDA3 132E85C2 26DFCD3D 2C62CDF1 2FBB375F 2FCB0B8A 4EBA358E 57DA1CEC 59F6CB0B 60D621C0 68E4C2C2 7A99ABFA
7B44F7BA 7E1E0B08 7EC15774 7F318E5B 9D748C83 A5D2FA71 D7126502 DAEA59DD E4157BFC F2F895BA FABEE259)
"(: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) 0 0 0 0 24 31 11 1 0 0 16 0 15 11 20 26)))
(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 68E4C2C2 7A99ABFA 7A9BD84A
7E1E0B08 7EC15774 9D748C83 A5D2FA71 AD4575D9 B08E958D B58649C9 BDD1B60F C4297528 CFADF401 D7126502 DA5197C7 ED5791F8
F682E177 FABEE259 FC06EE2A)
"(:ALLOW-OTHER-KEYS :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 16 31 21 18 7 0 31 24 0 13 21 26)))
(let ((b (& (>> val 12) #xf)))
(let ((a (>> (<< val 7) 28)))
(^ a (aref tab b))))))")
(#(1513AC6 3CC1B151 88B5C19C 891D9E04 CAD1FFFF F8C92483)
"(:FPSCR :CTR :LR :XER :CCR :MEMORY)"
"( (& (+ (>> val 6) (>> val 15)) 7))")
(#(24D3B50 805A8CE D64C851 207E1321 26568C99 2870F40D 2B465CCD 2CC89B6A 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 E6B647A0 F087745E F5306542 FA4BD0D1 FCFE2013)
"(:ALLOW-OTHER-KEYS :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 :CSIZE-BUFFER :CIN-BUFFER :IN-BUFFER)"
"((let ((tab #a((32) (unsigned-byte 8) 0 0 0 51 0 0 9 0 6 6 31 51 36 0 9 46 16 0 7 0 9 0 22 19 16 49 3 0 0 0 0 28)))
(let ((b (& (>> val 7) #x1f)))
(let ((a (>> (<< val 9) 27)))
(^ a (aref tab b))))))")
(#(2BFC6DD 4016778D 5595EEC3 880EEED7 BD0BBA8D D5D0A901 E6D49D13)
"#(((: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 15) (>> val 16)) 7))")
(#(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))))))")
(#(2CF0EF9 3BE22828 42D83FFB 62186BB2 72DFB17D A880B5A9)
"(:ALLOW-OTHER-KEYS :COMPILE-TOPLEVEL-OBJECT :ENTRY-POINTS :BLOCK-COMPILE :MSAN-UNPOISON :COVERAGE-METADATA)"
"( (& (- val (>> val 25)) 7))")
(#(3347C83 20DD4ACE 82E422D7 D70316D3 ED955117)
"(:UNKNOWN-KEYS :KNOWN :ERROR :FULL :LOCAL)"
"( (& (- (>> val 2) (>> val 19)) 7))")
(#(3589A30 ABD0207 B1AD88C C420C04 CC3F85F 163E7558 272B1D12 2AA5F8BA 31FABC1E 42D83FFB 524C48E2 541389A4 609A1E6B 62186BB2
63C971D7 6555431D 6FA6ADD3 705B4AC9 76316BB8 7D30DC7C 8D9B0A28 8F7912D6 94777CB7 BFA1A459 C92E5EEE DB4B667C E4157BFC
E7A70ACA E7AA772E EAC14D1C EB1FDCB6 EBD01872 F2F895BA FEFAF033)
"(:ALLOW-OTHER-KEYS :MAIN-ENTRY :MORE-ENTRY :ENTRY-POINTS :MAX-ARGS :MIN-ARGS :SOURCE-PATH :KEYP :ALLOWP :ARGLIST :IGNORE :TOP-LEVEL-DEFUN-P :INLINE-EXPANDED :XREF :PLIST :ENCLOSE :DOCUMENTATION :ARG-DOCUMENTATION :LEXENV :INLINE-EXPANSION :INLINEP :ENTRY-FUN :HAS-EXTERNAL-REFERENCES-P :KIND :%DEBUG-NAME :INFO :DYNAMIC-EXTENT :EVER-USED :REFS :WHERE-FROM :DEFINED-TYPE :TYPE :%SOURCE-NAME :NUMBER)"
"((let ((tab #a((32) (unsigned-byte 8) 0 0 9 0 0 0 0 7 0 7 28 19 22 0 9 0 26 0 9 9 0 0 19 0 9 9 22 16 0 45 38 24)))
(let ((b (& val #x1f)))
(let ((a (>> val 27)))
(^ a (aref tab b))))))")
(#(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))")
(#(423BE68 CC3F85F 1DA11FBF 241F8394 42D83FFB 5136A766 5ECBF2E6 7A4735C3 8715C70F 9515DD19 9D199C7E 9F1704E1 A042AA17 A58BD3CC
B219D70A C0447873 D20B4DC0 F26B59C0 F2F895BA FE805E90)
"(:ALLOW-OTHER-KEYS :ENVIRONMENT-CACHE :XREFS :INFO :FLAG :COMPONENT :DOMINATOR :LOOP-NEXT :LOOP :OUT :IN :KILL :FLAGS :PREV :NEXT :LAST :START :SUCC :PRED :NUMBER)"
"((let ((tab #a((16) (unsigned-byte 8) 0 0 0 13 0 13 3 13 21 12 16 8 14 21 0 1)))
(let ((b (& (>> val 1) #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 E739D471 FCF409E4)
"(:DYNAMIC-EXTENT :UNWIND-PROTECT :CATCH :TAGBODY :BLOCK)"
"( (& (+ val (>> val 6)) 7))")
(#(507273D 42D83FFB 63C971D7 659423EB 7D30DC7C A042AA17)
"(:ALLOW-OTHER-KEYS :SOURCE-PATH :BLOCK :USE :NEXT :KIND)"
"( (& (- (>> val 7) (>> val 24)) 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 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))")
(#(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))))))")
(#(6DDAAB7 CC3F85F 2709AB20 33FB65F5 3825DC9D 42D83FFB 4CE97B16 53DB5875 56AE7E65 7112F2E1 7D30DC7C 82E422D7 86F1FF99 9BC72CEA
A042AA17 A2CDD202 A9FD7E4C BF46CA52 CE012C98 DA5197C7 EBD01872)
"(:ALLOW-OTHER-KEYS :VERTEX :ENVIRONMENT :COST :OFFSET :SC :SAVE-TN :CURRENT-CONFLICT :GLOBAL-CONFLICTS :LOCAL-CONFLICTS :LOCAL-NUMBER :LOCAL :NEXT* :WRITES :READS :NEXT :LEAF :TYPE :PRIMITIVE-TYPE :KIND :NUMBER)"
"((let ((tab #a((16) (unsigned-byte 8) 0 31 0 21 0 26 31 13 0 16 13 0 14 0 0 11)))
(let ((b (& (>> val 12) #xf)))
(let ((a (>> (<< val 7) 28)))
(^ a (aref tab b))))))")
(#(727FC83 B522572 36F40154 38F4047A 4E722D78 6A1FC394 8014957D E422AA73)
"#(:ABSOLUTE :LAYOUT-ID :B :BA :HA :L :RLDIC-M :ADDIS+LD)"
"( (& (+ (>> val 9) (>> val 26)) 7))")
(#(727FC83 588D2B64 9D0C745F F8B597DD FBA66A22)
"(:BACK :UP :RELATIVE :WILD-INFERIORS :ABSOLUTE)"
"( (& (^ (>> val 3) (>> val 7)) 7))")
(#(7C68770 2ABF8C0F 2D6D7850 31FAF42A 42D83FFB 4D35E444 67CE129D 7BAF2F35 8488D5DE A1D91E1C AA17F098 B48B0D35 C25963AB)
"(:ALLOW-OTHER-KEYS :CLOSURE-SAVE-TN :ENVIRONMENT-START :ELSEWHERE-START :DEBUG-LIVE-TNS :LIVE-TNS :NUMBER-STACK-P :CFP-SAVED-PC :LRA-SAVED-PC :RETURN-PC-PASS :RETURN-PC :OLD-FP :CLOSURE)"
"((let ((tab #a((8) (unsigned-byte 8) 0 4 5 0 0 8 15 1)))
(let ((b (& (>> val 3) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(7C68770 2ABF8C0F 42D83FFB 4D35E444 594313BC 66390A20 7BAF2F35 7D30DC7C 8F575E80 A1D91E1C A6EF69DC AD4575D9 BAFE108A BB62E448
C82C25BB D62CDE7F)
"(:ALLOW-OTHER-KEYS :ELSEWHERE-PC :START-PC :CLOSURE-SAVE :CFP-SAVED-PC :LRA-SAVED-PC :OLD-FP :RETURN-PC-PASS :RETURN-PC :RETURNS :ARGUMENTS :TLF-NUMBER :BLOCKS :VARS :KIND :NAME)"
"((let ((tab #a((8) (unsigned-byte 8) 12 12 2 0 12 14 7 6)))
(let ((b (& (>> val 11) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(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))))))")
(#(8D6A093 2D3C0047 30EFFA5D 32030766 344955D3 3A384B97 444AF531 47AA782C 4AE88D7F 50613B7E 51AB5CD9 636A739F 6B01992A 7B8AB26D
7DEC68F1 86C51BD4 90EC2354 A258CBE6 AEE54B8F B84C6FDB B9D57393 C295156A CA1C9C88 D5530079 EB3E1439 F7167369)
"#(((:TYPE NUMERIC-TYPE)) ((:TYPE ARRAY-TYPE)) ((:TYPE UNION-TYPE)) ((:TYPE INTERSECTION-TYPE)) ((:TYPE MEMBER-TYPE)) ((:TYPE NAMED-TYPE)) ((:TYPE CHARACTER-SET-TYPE)) ((:TYPE CONS-TYPE)) ((:TYPE BUILT-IN-CLASSOID)) ((:TYPE FUN-DESIGNATOR-TYPE)) ((:TYPE FUN-TYPE)) ((:TYPE UNDEFINED-CLASSOID) (:TYPE CONDITION-CLASSOID) (:TYPE STRUCTURE-CLASSOID) (:TYPE STANDARD-CLASSOID) (:TYPE STATIC-CLASSOID) (:TYPE CLASSOID)) ((:TYPE CONSTANT-TYPE) (:TYPE VALUES-TYPE) (:TYPE ARGS-TYPE) (:TYPE UNKNOWN-TYPE) (:TYPE NEGATION-TYPE) (:TYPE ALIEN-TYPE-TYPE) (:TYPE HAIRY-TYPE) (:TYPE COMPOUND-TYPE) (:TYPE CTYPE)))"
"((let ((tab #a((16) (unsigned-byte 8) 7 0 21 0 0 0 15 21 18 17 13 18 0 26 30 25)))
(let ((b (>> val 28)))
(let ((a (& val #xf)))
(^ a (aref tab b))))))")
(#(8D6A093 2D3C0047 30EFFA5D 3A384B97 444AF531 4AE88D7F 50613B7E 51AB5CD9 636A739F 6B01992A 7B8AB26D 86C51BD4 90EC2354 A258CBE6
B84C6FDB B9D57393 C295156A CA1C9C88 D5530079 EB3E1439 F7167369)
"#(((:TYPE UNKNOWN-TYPE) (:TYPE HAIRY-TYPE)) ((:TYPE NEGATION-TYPE)) ((:TYPE UNION-TYPE)) ((:TYPE INTERSECTION-TYPE)) ((:TYPE MEMBER-TYPE)) ((:TYPE VALUES-TYPE) (:TYPE FUN-TYPE) (:TYPE FUN-DESIGNATOR-TYPE) (:TYPE ARGS-TYPE)) ((:TYPE NUMERIC-TYPE)) ((:TYPE UNDEFINED-CLASSOID) (:TYPE BUILT-IN-CLASSOID) (:TYPE CONDITION-CLASSOID) (:TYPE STRUCTURE-CLASSOID) (:TYPE STANDARD-CLASSOID) (:TYPE STATIC-CLASSOID) (:TYPE CLASSOID)) ((:TYPE ARRAY-TYPE)) ((:TYPE CONS-TYPE)) ((:TYPE CHARACTER-SET-TYPE)))"
"((let ((tab #a((16) (unsigned-byte 8) 0 0 0 0 0 0 0 0 13 0 0 12 0 23 23 21)))
(let ((b (& val #xf)))
(let ((a (>> val 28)))
(^ a (aref tab b))))))")
(#(8D6A093 2D3C0047 30EFFA5D 444AF531 4AE88D7F 50613B7E 51AB5CD9 636A739F 6B01992A 7B8AB26D 7DEC68F1 86C51BD4 B9D57393 C295156A
CA1C9C88)
"#(((:TYPE UNKNOWN-TYPE) (:TYPE HAIRY-TYPE) (:TYPE CHARACTER-SET-TYPE) (:TYPE MEMBER-TYPE) (:TYPE NUMERIC-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) 0 0 5 8 8 0 12 8)))
(let ((b (& val #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(8D6A093 2D3C0047 444AF531 47AA782C 50613B7E 636A739F 6B01992A 7DEC68F1 86C51BD4 B9D57393 CA1C9C88)
"#(((: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) 12 0 11 0 5 0 11 5)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ 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))")
(#(9773C53 E05B14F 2972DBF5 3A9E090D 42D83FFB 5F2CFB0C 6E3707AB 74EF2663 7DDF9D6B 7E17AD07 95735C77 A314FDF6 A79928BD A7C7407E
C223F137 C6DDCB4B CAFA87CC D84A30FD DD1D6422 EAB30BBE EAD0F217 F23B71A6)
"(:ALLOW-OTHER-KEYS :CONSTANTS :EXTERNALLY-CHECKABLE-TYPE :FOLDER :ANNOTATION :CALL-TYPE-DERIVER :RESULT-ARG :PREDICATE-TYPE :TEMPLATES :EQUALITY-CONSTRAINT :CONSTRAINT-PROPAGATE-IF :CONSTRAINT-PROPAGATE-RESULT :CONSTRAINT-PROPAGATE-BACK :CONSTRAINT-PROPAGATE :STACK-ALLOCATE-RESULT :IR2-HOOK :IR2-CONVERT :LTN-ANNOTATE :OPTIMIZER :DERIVE-TYPE :TRANSFORMS :ATTRIBUTES)"
"((let ((tab #a((16) (unsigned-byte 8) 1 0 0 9 0 1 11 21 21 3 21 16 21 26 0 0)))
(let ((b (& (>> val 12) #xf)))
(let ((a (>> (<< val 7) 28)))
(^ a (aref tab b))))))")
(#(9A320D4 37D0286E 39CAA339 3B6E7F62 43BBEE18 4D61368F 53222DFB 536D8784 9380837C A8A4C7D2 B4BDCB5F BFA86189 EAA3DA5C EDA1037F
F9BA9C52 FEE99A95)
"#(((:TYPE SB-C::REF)) ((:TYPE SB-C::CIF)) ((:TYPE SB-C:JUMP-TABLE)) ((: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((8) (unsigned-byte 8) 12 0 12 14 0 4 7 13)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(9A320D4 37D0286E 39CAA339 3B6E7F62 43BBEE18 4D61368F 53222DFB 536D8784 9380837C A8A4C7D2 B4BDCB5F BFA86189 EAA3DA5C EDA1037F
FEE99A95)
"#(((: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) 8 0 13 4 0 4 12 12)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(9A320D4 37D0286E 39CAA339 43BBEE18 4D61368F 53222DFB 536D8784 9380837C BFA86189 EDA1037F F9BA9C52 FEE99A95)
"#(((: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) 8 0 0 11 0 12 9 4)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(9A320D4 37D0286E 39CAA339 43BBEE18 53222DFB BFA86189 FEE99A95)
"#(((: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 26)) 7))")
(#(9A320D4 39CAA339 43BBEE18 4D61368F 53222DFB 536D8784 9380837C BFA86189 EDA1037F FEE99A95)
"#(((: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) 5 0 0 11 0 15 0 4)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(9A320D4 39CAA339 43BBEE18 4D61368F 53222DFB BFA86189 EDA1037F FEE99A95)
"#(((: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 3) (>> val 29)) 7))")
(#(9F68C87 18919578 3B91FC64 C49039A2 E487643D F5B1443E)
"(SIMPLE-BASE-STRING SIMPLE-STRING STRING SIMPLE-VECTOR VECTOR LIST)"
"( (& (^ (>> val 14) (>> val 21)) 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))))))")
(#(ABD0207 B1AD88C C420C04 CC3F85F D46D85D D4DC88F DACC4EC 1A5C37C1 272B1D12 2AA5F8BA 31FABC1E 3D0E622B 42D83FFB 524C48E2
541389A4 56AE7E65 6555431D 65A767F5 6FA6ADD3 705B4AC9 76316BB8 7D30DC7C 8C788991 8D9B0A28 8F7912D6 94777CB7 BB62E448
CF748A55 D750C880 DB4B667C E0983B54 E4157BFC E7A70ACA EAC14D1C EBD01872 EF4737B1 F2F895BA FEFAF033)
"(:ALLOW-OTHER-KEYS :ALLOW-INSTRUMENTING :CALL-LEXENV :ENVIRONMENT :TAIL-SET :CALLS-OR-CLOSES :DYNAMIC-EXTENTS :ENTRIES :LETS :HOME :RETURN :BIND :OPTIONAL-DISPATCH :VARS :IGNORE :TOP-LEVEL-DEFUN-P :INLINE-EXPANDED :XREF :PLIST :ENCLOSE :DOCUMENTATION :ARG-DOCUMENTATION :LEXENV :INLINE-EXPANSION :INLINEP :ENTRY-FUN :HAS-EXTERNAL-REFERENCES-P :KIND :%DEBUG-NAME :INFO :DYNAMIC-EXTENT :EVER-USED :REFS :WHERE-FROM :DEFINED-TYPE :TYPE :%SOURCE-NAME :NUMBER)"
"((let ((tab #a((32) (unsigned-byte 8) 19 28 0 0 9 10 0 19 0 0 28 0 9 0 0 9 0 0 0 9 36 0 16 6 41 0 22 18 0 49 61 49)))
(let ((b (& val #x1f)))
(let ((a (>> (<< val 9) 27)))
(^ a (aref tab b))))))")
(#(ABD0207 B1AD88C C420C04 CC3F85F 272B1D12 2AA5F8BA 31FABC1E 42D83FFB 524C48E2 541389A4 6555431D 6FA6ADD3 705B4AC9 76316BB8
7D30DC7C 8D9B0A28 8F7912D6 94777CB7 DB4B667C E4157BFC E7A70ACA EAC14D1C EBD01872 F2F895BA FEFAF033)
"(:ALLOW-OTHER-KEYS :IGNORE :TOP-LEVEL-DEFUN-P :INLINE-EXPANDED :XREF :PLIST :ENCLOSE :DOCUMENTATION :ARG-DOCUMENTATION :LEXENV :INLINE-EXPANSION :INLINEP :ENTRY-FUN :HAS-EXTERNAL-REFERENCES-P :KIND :%DEBUG-NAME :INFO :DYNAMIC-EXTENT :EVER-USED :REFS :WHERE-FROM :DEFINED-TYPE :TYPE :%SOURCE-NAME :NUMBER)"
"((let ((tab #a((16) (unsigned-byte 8) 0 0 13 31 21 0 0 21 0 0 0 21 0 30 1 23)))
(let ((b (& val #xf)))
(let ((a (>> (<< val 7) 28)))
(^ 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 . 1) (:POSITIVE-INFINITY . 2) (:NEGATIVE-INFINITY . 3))"
"( (& (>> val 13) 3) )")
(#(B445B28 2EF3F4BC 80D0C591 AC841474 C6B4780F)
"(BASE-CHAR CHARACTER T SINGLE-FLOAT DOUBLE-FLOAT)"
"( (& (^ val (>> val 19)) 7))")
(#(B7AF76D 21E9089F 2E6D6C2F 42D83FFB 88BDE5B2)
"(:ALLOW-OTHER-KEYS :FLAG-TN :TEMP-TN :NODE :STACK-P)"
"( (& (- val (>> val 9)) 7))")
(#(BA316CC 1FE456EC 3836DEFB 5D714507 6A1FC394 7F87FE72 8A31A1DB A56E935B AB2C6780 B4FE847C C95BECAA E578E28F F36C4AC5)
"#(:ASSEMBLY-ROUTINE :CARD-TABLE-INDEX-MASK :SYMBOL-TLS-INDEX :ALIEN-CODE-LINKAGE-INDEX :ALIEN-DATA-LINKAGE-INDEX :FOREIGN :FOREIGN-DATAREF :CODE-OBJECT :LAYOUT :IMMOBILE-SYMBOL :LINKAGE-CELL :SYMBOL-VALUE :LAYOUT-ID)"
"((let ((tab #a((8) (unsigned-byte 8) 0 11 12 5 9 14 2 3)))
(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))")
(#(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))")
(#(C420C04 CC3F85F CD56774 272B1D12 286380DF 2AA5F8BA 2D524721 42D83FFB 629F44EF 692DCAFA 8A0DBE41 8A5446D4 9EEEA5CF AC34266C
C0447873 DB4B667C E12DF278 E7A70ACA E7F043EA EAC14D1C EBD01872 EF4737B1 F2F895BA)
"(:ALLOW-OTHER-KEYS :SOURCE-FORM :EQUALITY-CONSTRAINTS-HASH :EQUALITY-CONSTRAINTS :INHERITABLE-CONSTRAINTS :EQL-VAR-CONSTRAINTS :EQ-CONSTRAINTS :CTYPE-CONSTRAINTS :CONSTRAINTS :SPECVAR :ARG-INFO :HOME :FLAGS :SETS :INFO :DYNAMIC-EXTENT :EVER-USED :REFS :WHERE-FROM :DEFINED-TYPE :TYPE :%SOURCE-NAME :NUMBER)"
"((let ((tab #a((16) (unsigned-byte 8) 0 0 0 0 0 1 18 15 31 13 16 0 25 0 7 18)))
(let ((b (& (>> val 1) #xf)))
(let ((a (>> (<< val 7) 28)))
(^ a (aref tab b))))))")
(#(C420C04 CC3F85F 15CC0915 272B1D12 2AA5F8BA 42D83FFB 629F44EF 6FA6ADD3 7D30DC7C 81DE9D83 DB4B667C E7A70ACA EAC14D1C EBD01872
F2F895BA FEFAF033)
"(:ALLOW-OTHER-KEYS :FUNCTIONAL :SAME-BLOCK-P :INLINE-EXPANSION :INLINEP :KIND :SETS :INFO :DYNAMIC-EXTENT :EVER-USED :REFS :WHERE-FROM :DEFINED-TYPE :TYPE :%SOURCE-NAME :NUMBER)"
"((let ((tab #a((8) (unsigned-byte 8) 0 12 12 4 14 6 14 0)))
(let ((b (& (>> val 10) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(C420C04 CC3F85F 272B1D12 2AA5F8BA 42D83FFB 629F44EF 7D30DC7C DB4B667C E7A70ACA EAC14D1C EBD01872 F2F895BA)
"(:ALLOW-OTHER-KEYS :KIND :SETS :INFO :DYNAMIC-EXTENT :EVER-USED :REFS :WHERE-FROM :DEFINED-TYPE :TYPE :%SOURCE-NAME :NUMBER)"
"((let ((tab #a((8) (unsigned-byte 8) 4 0 0 9 5 0 14 12)))
(let ((b (& (>> val 12) #x7)))
(let ((a (>> (<< val 4) 29)))
(^ a (aref tab b))))))")
(#(CC3F85F 180C8C3A 25536920 3D127E44 42D83FFB 4D28C61A 5D31FE91 63C971D7 8715C70F 8F7912D6 A042AA17 BF5F1937 CA1AFD25)
"(:ALLOW-OTHER-KEYS :ALTERNATIVE-CONSTRAINTS :ALTERNATIVE :CONSEQUENT-CONSTRAINTS :CONSEQUENT :TEST :TAIL-P :SOURCE-PATH :LEXENV :PREV :NEXT :REOPTIMIZE :NUMBER)"
"((let ((tab #a((8) (unsigned-byte 8) 4 13 0 12 14 0 5 4)))
(let ((b (& (>> val 3) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(CC3F85F 1FC759CF 25536920 28B27B84 42D83FFB 5D31FE91 63C971D7 860D0EEC 8715C70F 8F7912D6 A042AA17 F2F895BA)
"(:ALLOW-OTHER-KEYS :PRESERVE-INFO :INFO :CLEANUP :VALUES :TAIL-P :SOURCE-PATH :LEXENV :PREV :NEXT :REOPTIMIZE :NUMBER)"
"((let ((tab #a((8) (unsigned-byte 8) 1 0 12 0 12 0 12 10)))
(let ((b (& (>> val 4) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(CC3F85F 25536920 2AA5F8BA 42D83FFB 5D31FE91 63C971D7 8715C70F 8F7912D6 A042AA17 C42F9C28)
"(:ALLOW-OTHER-KEYS :DYNAMIC-EXTENT :FUNS :TAIL-P :SOURCE-PATH :LEXENV :PREV :NEXT :REOPTIMIZE :NUMBER)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 8 5 0 0 12 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(CC3F85F 25536920 3F90074C 42D83FFB 581EB11B 5D31FE91 63C971D7 8715C70F 8F7912D6 A042AA17 A2B0ECD5)
"(:ALLOW-OTHER-KEYS :RESULT-TYPE :RESULT :LAMBDA :TAIL-P :SOURCE-PATH :LEXENV :PREV :NEXT :REOPTIMIZE :NUMBER)"
"((let ((tab #a((8) (unsigned-byte 8) 12 13 0 14 3 5 2 7)))
(let ((b (& (>> val 7) #x7)))
(let ((a (>> (<< val 31) 29)))
(^ a (aref tab b))))))")
(#(CC3F85F 25536920 42D83FFB 5184FA9F 5D31FE91 63C971D7 85240162 866F21DB 8715C70F 8F7912D6 A042AA17 A58F1BE3 CD53410E DAEC1DD5
ED5E9C0E FE632C36)
"(:ALLOW-OTHER-KEYS :SILENT-CONFLICT :CONTEXT :VALUE :%TYPE-CHECK :TYPE-TO-CHECK :ASSERTED-TYPE :LVAR :DERIVED-TYPE :TAIL-P :SOURCE-PATH :LEXENV :PREV :NEXT :REOPTIMIZE :NUMBER)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 12 0 11 8 14 2)))
(let ((b (& (>> val 7) #x7)))
(let ((a (>> (<< val 2) 29)))
(^ a (aref tab b))))))")
(#(CC3F85F 25536920 42D83FFB 5184FA9F 5D31FE91 63C971D7 8715C70F 8F7912D6 A042AA17 DAEC1DD5 F2FF9C61 FE632C36)
"(:ALLOW-OTHER-KEYS :VALUE :VAR :LVAR :DERIVED-TYPE :TAIL-P :SOURCE-PATH :LEXENV :PREV :NEXT :REOPTIMIZE :NUMBER)"
"((let ((tab #a((8) (unsigned-byte 8) 14 0 0 15 12 3 3 4)))
(let ((b (>> val 29)))
(let ((a (& val #x7)))
(^ a (aref tab b))))))")
(#(CC3F85F 25536920 42D83FFB 5D31FE91 602DC59D 63C971D7 860D0EEC 8715C70F 8F7912D6 A042AA17)
"(:ALLOW-OTHER-KEYS :CLEANUP :EXITS :TAIL-P :SOURCE-PATH :LEXENV :PREV :NEXT :REOPTIMIZE :NUMBER)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 0 5 12 5 13 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(CC3F85F 25536920 42D83FFB 5D31FE91 63C971D7 8715C70F 8F7912D6 A042AA17 A2B0ECD5)
"(:ALLOW-OTHER-KEYS :LAMBDA :TAIL-P :SOURCE-PATH :LEXENV :PREV :NEXT :REOPTIMIZE :NUMBER)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 0 5 0 13 2 0)))
(let ((b (& val #x7)))
(let ((a (>> val 29)))
(^ a (aref tab b))))))")
(#(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 17438343 42D83FFB 6E42B920 90D71785 EF4737B1)
"(:ALLOW-OTHER-KEYS :BLOCK-TN :TARGET :DYNAMIC-STATE :SAVE-SP :HOME)"
"( (& (+ (>> val 2) (>> val 3)) 7))")
(#(CCE35B7 33FB65F5 6C414B8A 6F31BE0A A9FD7E4C BA0D8C5F DE0A9C1B)
"(:UNUSED-IF :SCS :TO :FROM :OFFSET :SC :TARGET)"
"( (& (+ (>> val 4) (>> val 8)) 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 3573C22C 3884DD16 3CA49203 3EBC6344 42D83FFB 5B6BC745 632BDBE5
68E4C2C2 68FDE47B 6E3707AB 74673302 7E1E0B08 899C08B3 A3D2F179 A5D2FA71 AD4575D9 B0113B7E B58649C9 B803E7E1 BFF51002
D7126502 DA5197C7 DAF68EAF EBD01872 F4D7A12A FABEE259)
"(:ALLOW-OTHER-KEYS :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 9 0 0 6 28 0 0 0 7 0 28 61 2 0 0 7 0 0 0 20 9 0 1 28 12)))
(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 A9482954
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 :SPECIFIED-SAVE-TNS :NFP :COMPONENT-TNS :CONSTANT-TNS :WIRED-TNS :RESTRICTED-TNS :NORMAL-TNS :GLOBAL-TN-COUNTER)"
"((let ((tab #a((16) (unsigned-byte 8) 3 1 11 26 0 27 1 0 0 26 1 0 11 5 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))")
(#(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 B9B79FF6)
"(:ALLOW-OTHER-KEYS :FUNCTION :FORM :PLIST :START-POSITIONS :CREATED :NAMESTRING)"
"( (& (- (>> val 1) (>> val 15)) 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))")
(#(F0E22EF 1210DEA4 2573565B 27B0CCE3 30BDFB0F 3B4E9A99 49980093 4B1E6191 4E9FD6B0 76AE79FE 7C220D2D 9C50DDC2 B4776BAB E78C6BD8
ED5E7C28)
"#(((: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 15 7 0 10 0 13 7)))
(let ((b (& (>> val 2) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(F14865E 606FAF4E B8B18FFE CAA95D8F D7F08D68)
"(REST FIRST CDR CAR AREF)"
"( (& (- (>> val 1) (>> val 7)) 7))")
(#(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))")
(#(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 . 4) (:OVERFLOW . 8) (:INEXACT . 1) (:INVALID . 16) (: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))")
(#(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))))))")
(#(163E7558 42D83FFB 5A95FD85 5D9A19B2 E7AA772E)
"(:ALLOW-OTHER-KEYS :KEYS :TYPES :MAX-ARGS :MIN-ARGS)"
"( (& (+ val (>> val 25)) 7))")
(#(1689D418 42D83FFB 6612F3EB 8488D5DE 8556E0F3 95C078F4 A6473916 DF8ACC18)
"(:ALLOW-OTHER-KEYS :WIRED-MAP :LAST-BLOCK-COUNT :LIVE-TNS :ALWAYS-LIVE :CONFLICTS :LAST-OFFSET :CURRENT-SIZE)"
"( (& (^ val (>> val 25)) 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))))))")
(#(18887AB1 19FD76A2 42D83FFB EBD01872 FCEE294B)
"(:ALLOW-OTHER-KEYS :STRICT :SINGLE-PREDECESSOR :CAST :TYPE)"
"( (& (>> val 24) 7))")
(#(1894EF0F 1B5666D7 2091FC29 42D83FFB 4F5809D0 606EE9F6 6146FDEA 704F55EE 804A41A7 8B32A898 9EF9A0A6 A12352A9 B3B7ED4C
BFAC65A0 F1D63D7A FB3D98A2 FBB3277A)
"(:ALLOW-OTHER-KEYS :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 12 0 0 7 1 0 13 20)))
(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))")
(#(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 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) )")
(#(1DD1C1D7 22D1C9B6 2EF3F4BC 3CF40AC6 3ECBE59C 4FCC005F 80BF818F 831D9492 8FBF992C 941DAF55 A42F11A6 C61980DD C8198403
DC33E6FC)
"((:T . 31) (:LT . 16) (:LE . 20) (:EQ . 4) (:LNG . 6) (:GE . 12) (:NE . 24) (:NG . 20) (:LLT . 2) (:F . 0) (:LLE . 6) (:LGE . 5) (:LGT . 1) (:LNL . 5))"
"((let ((tab #a((8) (unsigned-byte 8) 13 12 5 0 0 14 1 13)))
(let ((b (& (>> val 5) #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(1DED3ADB 20DD4ACE 7584640E 8EA2EA63)
"(:FORCE :ERROR :WARN :PUNT)"
"( (& (>> val 21) 3) )")
(#(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))")
(#(1F029D6B 42D83FFB 9662A88A A864222B E2F99B31)
"(:ALLOW-OTHER-KEYS :SIMILAR-CONSTANTS :EQL-CONSTANTS :FREE-FUNS :FREE-VARS)"
"( (& (+ (>> val 1) (>> val 11)) 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))))))")
(#(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)
"(ARRAY-TYPE NEGATION-TYPE ALIEN-TYPE-TYPE SIMD-PACK-256-TYPE SIMD-PACK-TYPE UNKNOWN-TYPE HAIRY-TYPE)"
"( (& (- (>> val 6) (>> 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) )")
(#(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 72E2CBDA 75E7305A 80D0C591 AC841474)
"(REAL FLOAT DOUBLE-FLOAT SINGLE-FLOAT RATIONAL INTEGER)"
"( (& (+ (>> val 5) (>> val 6)) 7))")
(#(236A976D 3F90074C 42D83FFB 4C9563A8 71FB8EC1 7E1E0B08 B169B946 E940F22A)
"(:ALLOW-OTHER-KEYS :CONVENTION :STUB :VARARGS :ARG-TYPES :RESULT-TYPE :ALIGNMENT :BITS)"
"( (& (>> val 10) 7))")
(#(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))")
(#(2468DEF7 32F372F7 42D83FFB A58F1BE3 EF8EA2F3)
"(:ALLOW-OTHER-KEYS :SIGNAL-VIA :ALLOW-SYMBOL-MACRO :ALLOW-SPECIAL :CONTEXT)"
"( (& (^ (>> val 4) (>> val 21)) 7))")
(#(25612E3B 319EAA75 42D83FFB 594313BC 602DC59D 7D30DC7C CFA5803C E22F3841 EB45269C F2F895BA)
"(:ALLOW-OTHER-KEYS :INFO :BLOCKS :DEPTH :INFERIORS :SUPERIOR :EXITS :TAIL :HEAD :KIND)"
"((let ((tab #a((8) (unsigned-byte 8) 0 0 4 12 0 0 2 0)))
(let ((b (>> val 29)))
(let ((a (& val #x7)))
(^ 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))")
(#(27168950 85BA4FD3 92FE1EC2 CF5ABDAB F28A2060)
"(:QWORD :DWORD :WORD :HALFWORD :BYTE)"
"( (& (>> val 12) 7))")
(#(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))))))")
(#(28BA26DE 4067C9DE A6A1DD56 E76579F3)
"(:INVERT :PRESERVE :DOWNCASE :UPCASE)"
"( (>> val 30) )")
(#(2A4B00C6 2B465CCD 42D83FFB 96A5F5BD B8D32AF5 ECF81B20 FA4BD0D1)
"(:ALLOW-OTHER-KEYS :CLASS :EXTERNAL-FORMAT :IF-DOES-NOT-EXIST :IF-EXISTS :ELEMENT-TYPE :DIRECTION)"
"( (& (^ val (>> val 23)) 7))")
(#(2AA5F8BA 5A8E5A04 89DC592F 8EF36E51 9384909E 973E9024 9FA987D3 A22B5571 A49305EF A51FC14A B1478F0B B31CDF30 B3775562
BBF9B8CE D31B15E2 D396A1B6 D506BD28 E4157BFC EBD01872)
"(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 0 31 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 A49305EF D396A1B6 E4157BFC)
"(SPECIAL IGNORABLE IGNORE DYNAMIC-EXTENT SB-C::CONSTANT-VALUE SB-C::NO-CONSTRAINTS)"
"( (& (- (>> val 5) (>> val 15)) 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))")
(#(2BF5F421 42D83FFB 4341F7D8 63C971D7 8F7912D6)
"(:ALLOW-OTHER-KEYS :LAMBDA-VAR :FIRED :LEXENV :SOURCE-PATH)"
"( (& (- (>> val 1) (>> val 30)) 7))")
(#(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))")
(#(2D3C0047 30EFFA5D 32030766 444AF531 47AA782C 4AE88D7F 50613B7E 51AB5CD9 636A739F 6B01992A 7B8AB26D 7DEC68F1 86C51BD4
B9D57393 C295156A CA1C9C88)
"#(((:TYPE VALUES-TYPE)) ((:TYPE FUN-DESIGNATOR-TYPE) (:TYPE FUN-TYPE)) ((:TYPE NUMERIC-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) 8 0 14 2 0 8 0 12)))
(let ((b (& val #x7)))
(let ((a (>> (<< val 5) 29)))
(^ a (aref tab b))))))")
(#(2D3C0047 30EFFA5D 3A384B97 444AF531 4AE88D7F 50613B7E 51AB5CD9 7B8AB26D 90EC2354 A258CBE6 B84C6FDB C295156A CA1C9C88
D5530079 EB3E1439 F7167369)
"#(((:TYPE MEMBER-TYPE)) ((:TYPE UNDEFINED-CLASSOID) (:TYPE BUILT-IN-CLASSOID) (:TYPE CONDITION-CLASSOID) (:TYPE STRUCTURE-CLASSOID) (:TYPE STANDARD-CLASSOID) (:TYPE STATIC-CLASSOID) (:TYPE CLASSOID)) ((:TYPE NUMERIC-TYPE) (:TYPE CHARACTER-SET-TYPE) (:TYPE ARRAY-TYPE) (:TYPE CONS-TYPE)) ((:TYPE INTERSECTION-TYPE)) ((:TYPE UNION-TYPE)) ((:TYPE UNKNOWN-TYPE) (:TYPE HAIRY-TYPE)))"
"((let ((tab #a((8) (unsigned-byte 8) 13 0 0 14 12 9 0 5)))
(let ((b (& (>> val 17) #x7)))
(let ((a (>> (<< val 3) 29)))
(^ a (aref tab b))))))")
(#(2D4E6353 3336F7AC 42D83FFB 6634E9C8 DB5C8A6A)