alpha.c (vms_valid_pointer_mode): New function.

* config/alpha/alpha.c (vms_valid_pointer_mode): New function.
	* config/alpha/vms.h (TARGET_VALID_POINTER_MODE): Define.

From-SVN: r150849
This commit is contained in:
Douglas B Rupp 2009-08-17 16:22:48 +00:00 committed by Douglas Rupp
parent be274b21f7
commit dfe6ba6df9
3 changed files with 15 additions and 0 deletions

View File

@ -1,3 +1,8 @@
2009-08-17 Douglas B Rupp <rupp@gnat.com>
* config/alpha/alpha.c (vms_valid_pointer_mode): New function.
* config/alpha/vms.h (TARGET_VALID_POINTER_MODE): Define.
2009-08-16 Douglas B Rupp <rupp@gnat.com>
* doc/invoke.texi (Target options):

View File

@ -200,6 +200,7 @@ static rtx alpha_emit_xfloating_compare (enum rtx_code *, rtx, rtx);
#if TARGET_ABI_OPEN_VMS
static void alpha_write_linkage (FILE *, const char *, tree);
static bool vms_valid_pointer_mode (enum machine_mode);
#endif
static void unicosmk_output_deferred_case_vectors (FILE *);
@ -773,6 +774,12 @@ alpha_in_small_data_p (const_tree exp)
}
#if TARGET_ABI_OPEN_VMS
static bool
vms_valid_pointer_mode (enum machine_mode mode)
{
return (mode == SImode || mode == DImode);
}
static bool
alpha_linkage_symbol_p (const char *symname)
{

View File

@ -394,3 +394,6 @@ typedef struct crtl_name_spec
#define INIT_SECTION_ASM_OP "\t.section LIB$INITIALIZE,GBL,NOWRT"
#define LONGLONG_STANDALONE 1
#undef TARGET_VALID_POINTER_MODE
#define TARGET_VALID_POINTER_MODE vms_valid_pointer_mode