mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-03 13:20:26 +02:00
05b88d9d45
* include/lightning/jit_alpha.h, lib/jit_alpha-cpu.c,
lib/jit_alpha-fpu.c, lib/jit_alpha-sz.c, lib/jit_alpha.c:
New files implementing a lightning Alpha port. Thanks
to Trent Nelson and snakebit.net staff for providing access
to an Alpha system.
* check/float.tst, check/lightning.c, configure.ac,
include/lightning.h, include/lightning/Makefile.am,
include/lightning/jit_private.h, lib/Makefile.am,
lib/jit_disasm.c, lib/jit_size.c, lib/lightning.c:
Minor changes to adapt for the new Alpha port.
350 lines
2.6 KiB
C
350 lines
2.6 KiB
C
|
|
#if __WORDSIZE == 64
|
|
#define JIT_INSTR_MAX 76
|
|
0,
|
|
0,
|
|
0,
|
|
0,
|
|
0,
|
|
0,
|
|
0,
|
|
76,
|
|
0,
|
|
4,
|
|
32,
|
|
12,
|
|
40,
|
|
28,
|
|
28,
|
|
4,
|
|
32,
|
|
12,
|
|
40,
|
|
28,
|
|
28,
|
|
4,
|
|
32,
|
|
44,
|
|
56,
|
|
12,
|
|
32,
|
|
48,
|
|
72,
|
|
48,
|
|
72,
|
|
56,
|
|
56,
|
|
56,
|
|
56,
|
|
48,
|
|
72,
|
|
48,
|
|
72,
|
|
4,
|
|
32,
|
|
4,
|
|
32,
|
|
4,
|
|
32,
|
|
4,
|
|
4,
|
|
4,
|
|
4,
|
|
4,
|
|
4,
|
|
4,
|
|
4,
|
|
4,
|
|
4,
|
|
4,
|
|
8,
|
|
4,
|
|
8,
|
|
4,
|
|
4,
|
|
4,
|
|
4,
|
|
4,
|
|
8,
|
|
4,
|
|
8,
|
|
4,
|
|
8,
|
|
4,
|
|
8,
|
|
8,
|
|
12,
|
|
4,
|
|
32,
|
|
8,
|
|
8,
|
|
8,
|
|
8,
|
|
8,
|
|
8,
|
|
36,
|
|
12,
|
|
40,
|
|
4,
|
|
32,
|
|
12,
|
|
40,
|
|
4,
|
|
32,
|
|
4,
|
|
32,
|
|
12,
|
|
40,
|
|
4,
|
|
32,
|
|
16,
|
|
12,
|
|
8,
|
|
4,
|
|
16,
|
|
12,
|
|
8,
|
|
4,
|
|
8,
|
|
4,
|
|
16,
|
|
12,
|
|
8,
|
|
4,
|
|
4,
|
|
32,
|
|
4,
|
|
32,
|
|
4,
|
|
32,
|
|
4,
|
|
32,
|
|
8,
|
|
4,
|
|
8,
|
|
4,
|
|
8,
|
|
4,
|
|
8,
|
|
4,
|
|
8,
|
|
8,
|
|
8,
|
|
12,
|
|
8,
|
|
12,
|
|
8,
|
|
12,
|
|
8,
|
|
40,
|
|
8,
|
|
12,
|
|
8,
|
|
12,
|
|
8,
|
|
12,
|
|
8,
|
|
12,
|
|
8,
|
|
36,
|
|
8,
|
|
8,
|
|
8,
|
|
8,
|
|
28,
|
|
32,
|
|
16,
|
|
16,
|
|
28,
|
|
32,
|
|
16,
|
|
16,
|
|
28,
|
|
32,
|
|
16,
|
|
16,
|
|
28,
|
|
32,
|
|
16,
|
|
16,
|
|
0,
|
|
36,
|
|
8,
|
|
36,
|
|
68,
|
|
0,
|
|
8,
|
|
32,
|
|
8,
|
|
32,
|
|
8,
|
|
32,
|
|
8,
|
|
32,
|
|
4,
|
|
4,
|
|
8,
|
|
32,
|
|
56,
|
|
32,
|
|
56,
|
|
32,
|
|
56,
|
|
32,
|
|
56,
|
|
32,
|
|
56,
|
|
32,
|
|
56,
|
|
32,
|
|
56,
|
|
32,
|
|
56,
|
|
32,
|
|
56,
|
|
32,
|
|
56,
|
|
32,
|
|
56,
|
|
32,
|
|
56,
|
|
20,
|
|
44,
|
|
20,
|
|
44,
|
|
16,
|
|
16,
|
|
12,
|
|
4,
|
|
4,
|
|
24,
|
|
4,
|
|
32,
|
|
8,
|
|
4,
|
|
4,
|
|
32,
|
|
8,
|
|
4,
|
|
24,
|
|
48,
|
|
24,
|
|
48,
|
|
24,
|
|
48,
|
|
24,
|
|
48,
|
|
24,
|
|
48,
|
|
28,
|
|
52,
|
|
28,
|
|
52,
|
|
28,
|
|
52,
|
|
28,
|
|
52,
|
|
28,
|
|
52,
|
|
28,
|
|
52,
|
|
28,
|
|
52,
|
|
12,
|
|
36,
|
|
12,
|
|
36,
|
|
0,
|
|
8,
|
|
28,
|
|
8,
|
|
28,
|
|
8,
|
|
28,
|
|
8,
|
|
28,
|
|
4,
|
|
4,
|
|
8,
|
|
32,
|
|
52,
|
|
32,
|
|
52,
|
|
32,
|
|
52,
|
|
32,
|
|
52,
|
|
32,
|
|
52,
|
|
32,
|
|
52,
|
|
32,
|
|
52,
|
|
32,
|
|
52,
|
|
32,
|
|
52,
|
|
32,
|
|
52,
|
|
32,
|
|
52,
|
|
32,
|
|
52,
|
|
20,
|
|
40,
|
|
20,
|
|
40,
|
|
16,
|
|
16,
|
|
12,
|
|
4,
|
|
4,
|
|
20,
|
|
4,
|
|
32,
|
|
8,
|
|
4,
|
|
4,
|
|
32,
|
|
8,
|
|
4,
|
|
24,
|
|
44,
|
|
24,
|
|
44,
|
|
24,
|
|
44,
|
|
24,
|
|
44,
|
|
24,
|
|
44,
|
|
28,
|
|
48,
|
|
28,
|
|
48,
|
|
28,
|
|
48,
|
|
28,
|
|
48,
|
|
28,
|
|
48,
|
|
28,
|
|
48,
|
|
28,
|
|
48,
|
|
12,
|
|
32,
|
|
12,
|
|
32,
|
|
0,
|
|
0,
|
|
0,
|
|
0,
|
|
0,
|
|
0,
|
|
0,
|
|
0,
|
|
0,
|
|
0,
|
|
0,
|
|
#endif /* __WORDSIZE */
|