1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-20 18:50:21 +02:00

ALPHA: Implement lightning Alpha port.

* 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.
This commit is contained in:
pcpa 2014-08-10 11:48:35 -03:00
parent 53dd28d682
commit 05b88d9d45
16 changed files with 5979 additions and 12 deletions

350
lib/jit_alpha-sz.c Normal file
View file

@ -0,0 +1,350 @@
#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 */