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.

include/lightning.h

@@ -26,12 +26,17 @@
 
 #include <unistd.h>
 #include <stdlib.h>
-#include <stdint.h>
+#if HAVE_STDINT_H
+#  include <stdint.h>
+#endif
 #include <string.h>
 
 #if defined(__hpux) && defined(__hppa__)
 #  include <machine/param.h>
 #endif
+#if defined(__alpha__) && defined(__osf__)
+#  include <machine/endian.h>
+#endif
 
 #ifndef __WORDSIZE
 #  if defined(WORDSIZE)				/* ppc darwin */
@@ -137,6 +142,8 @@ typedef jit_int32_t		jit_fpr_t;
 #  include <lightning/jit_aarch64.h>
 #elif defined(__s390x__)
 #  include <lightning/jit_s390x.h>
+#elif defined(__alpha__)
+#  include <lightning/jit_alpha.h>
 #endif
 
 #define jit_flag_node		0x00000001 /* patch node not absolute */

include/lightning/Makefile.am

@@ -55,3 +55,7 @@ if cpu_s390x
 lightning_include_HEADERS = 	\
 	jit_s390x.h
 endif
+if cpu_alpha
+lightning_include_HEADERS = 	\
+	jit_alpha.h
+endif

include/lightning/jit_alpha.h

@@ -0,0 +1,107 @@
+/*
+ * Copyright (C) 2014  Free Software Foundation, Inc.
+ *
+ * This file is part of GNU lightning.
+ *
+ * GNU lightning is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU Lesser General Public License as published
+ * by the Free Software Foundation; either version 3, or (at your option)
+ * any later version.
+ *
+ * GNU lightning is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+ * or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
+ * License for more details.
+ *
+ * Authors:
+ *	Paulo Cesar Pereira de Andrade
+ */
+
+#ifndef _jit_alpha_h
+#define _jit_alpha_h
+
+#define JIT_HASH_CONSTS		1
+#define JIT_NUM_OPERANDS	3
+
+/*
+ * Types
+ */
+#define JIT_FP			_FP
+typedef enum {
+#define jit_arg_reg_p(i)	((i) >= 0 && (i) < 6)
+#define jit_r(i)		(_S0 + (i))
+#define jit_r_num()		3
+#define jit_v(i)		(_S3 + (i))
+#define jit_v_num()		3
+#define jit_arg_f_reg_p(i)	((i) >= 0 && (i) < 6)
+#define jit_f(i)		(_F2 + (i))
+#define jit_f_num()		8
+    /* Volatile - Assembly temporary register */
+    _AT,
+    /* Volatile - Return value register */
+    _V0,
+    /* Volatile - Temporary registers */
+    _T0,		_T1,		_T2,		_T3,
+    _T4,		_T5,		_T6,		_T7,
+    _T8,		_T9,		_T10,		_T11,
+    /* FIXME Use callee save register for r0-r2 (instead of 12+ JIT_RN
+     * and 6 JIT_VN because division must call a function)
+     * FIX would be to create proper functions that do not clobber
+     * registers and inject/inline them in the jit */
+#define JIT_R0			_S0
+#define JIT_R1			_S1
+#define JIT_R2			_S2
+#define JIT_V0			_S3
+#define JIT_V1			_S4
+#define JIT_V2			_S5
+    /* Nonvolatile - Saved registers */
+    _S0,		_S1,		_S2,		_S3,
+    _S4,		_S5,
+    /* Nonvolatile - Frame pointer */
+    _FP,
+    /* Volatile - Argument registers */
+    _A5, 		_A4,		_A3,		_A2,
+    _A1,		_A0,
+    /* Volatile - Return address register */
+    _RA,
+    /* Volatile - Temporary register */
+    _PV,
+    /* Nonvolatile - Global pointer */
+    _GP,
+    /* Nonvolatile - Stack pointer */
+    _SP,
+    /* Constant  RAZ / writes ignored */
+    _ZERO,
+#define JIT_F0			_F2
+#define JIT_F1			_F3
+#define JIT_F2			_F4
+#define JIT_F3			_F5
+#define JIT_F4			_F6
+#define JIT_F5			_F7
+#define JIT_F6			_F8
+#define JIT_F7			_F9
+    /* Volatile - Return value register (real part) */
+    _F0,
+    /* Volatile - Return value register (imaginary part) */
+    _F1,
+    /* Nonvolatile - Saved registers */
+    _F2,		_F3,		_F4,		_F5,
+    _F6,		_F7,		_F8,		_F9,
+    /* Volatile - Temporary registers */
+    _F10,		_F11,		_F12,		_F13,
+    _F14,		_F15,
+    /* Volatile - Argument registers */
+    _F21,		_F20,		_F19,		_F18,
+    _F17,		_F16,
+    /* Volatile - Temporary registers */
+    _F22,		_F23,		_R24,		_F25,
+    _F26,		_F27,		_F28,		_F29,
+    _F30,
+    /* Constant - RAZ / writes ignored */
+    _F31,
+    /* Lightning internal invalid register identifier */
+    _NOREG,
+#define JIT_NOREG		_NOREG
+} jit_reg_t;
+
+#endif /* _jit_alpha_h */

include/lightning/jit_private.h

@@ -116,6 +116,11 @@ typedef jit_uint64_t		jit_regset_t;
 #  define JIT_RET		_R2
 #  define JIT_FRET		_F0
 typedef jit_uint32_t		jit_regset_t;
+#elif defined(__alpha__)
+#  define JIT_SP		_SP
+#  define JIT_RET		_V0
+#  define JIT_FRET		_F0
+typedef jit_uint64_t		jit_regset_t;
 #endif
 
 #define jit_size(vector)	(sizeof(vector) / sizeof((vector)[0]))
@@ -355,7 +360,7 @@ struct jit_compiler {
     jit_int32_t		  rout;		/* first output register */
     jit_int32_t		  breg;		/* base register for prolog/epilog */
 #endif
-#if __mips__ || __ia64__
+#if __mips__ || __ia64__ || __alpha__
     jit_int32_t		  carry;
 #define jit_carry	  _jitc->carry
 #endif