procyberian/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

vms.h (TARGET_OS_CPP_BUILTINS): Define __CRTL_VER and __VMS_VER.

Browse source 
2012-03-16  Tristan Gingold  <gingold@adacore.com>

	* config/vms/vms.h (TARGET_OS_CPP_BUILTINS): Define
	__CRTL_VER and __VMS_VER.
	* config/vms/vms-protos.h: Declare vms_c_get_crtl_ver
	and vms_c_get_vms_ver.
	* config/vms/vms-c.c (vms_c_get_crtl_ver, vms_c_get_vms_ver): New
	functions.
	* config/alpha/vms.h (VMS_DEFAULT_CRTL_VER)
	(VMS_DEFAULT_VMS_VER): Define.
	* config/ia64/vms.h (VMS_DEFAULT_CRTL_VER)
	(VMS_DEFAULT_VMS_VER): Define.

From-SVN: r185462
This commit is contained in:
Tristan Gingold 2012-03-16 09:55:56 +00:00 • committed by Tristan Gingold
parent 50a763ab47
commit 6ceb677f26
6 changed files with 54 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
gcc/ChangeLog
View file

@ -1,3 +1,16 @@
2012-03-16 Tristan Gingold <gingold@adacore.com>
* config/vms/vms.h (TARGET_OS_CPP_BUILTINS): Define
__CRTL_VER and __VMS_VER.
* config/vms/vms-protos.h: Declare vms_c_get_crtl_ver
and vms_c_get_vms_ver.
* config/vms/vms-c.c (vms_c_get_crtl_ver, vms_c_get_vms_ver): New
functions.
* config/alpha/vms.h (VMS_DEFAULT_CRTL_VER)
(VMS_DEFAULT_VMS_VER): Define.
* config/ia64/vms.h (VMS_DEFAULT_CRTL_VER)
(VMS_DEFAULT_VMS_VER): Define.
2012-03-16 Richard Guenther <rguenther@suse.de>
* tree-vect-loop.c (get_initial_def_for_induction): Use

4
gcc/config/alpha/vms.h
View file

@ -289,3 +289,7 @@ do { \
#undef TARGET_VALID_POINTER_MODE
#define TARGET_VALID_POINTER_MODE vms_valid_pointer_mode
/* Default values for _CRTL_VER and _VMS_VER. */
#define VMS_DEFAULT_CRTL_VER 70320000
#define VMS_DEFAULT_VMS_VER 70320000

4
gcc/config/ia64/vms.h
View file

@ -157,3 +157,7 @@ STATIC func_ptr __CTOR_LIST__[1] \
/* IA64 VMS doesn't fully support COMDAT sections. */
#define SUPPORTS_ONE_ONLY 0
/* Default values for _CRTL_VER and _VMS_VER. */
#define VMS_DEFAULT_CRTL_VER 80300000
#define VMS_DEFAULT_VMS_VER 80300000

16
gcc/config/vms/vms-c.c
View file

@ -466,3 +466,19 @@ vms_c_common_override_options (void)
break;
}
}
/* The default value for _CRTL_VER macro. */
int
vms_c_get_crtl_ver (void)
{
return VMS_DEFAULT_CRTL_VER;
}
/* The default value for _VMS_VER macro. */
int
vms_c_get_vms_ver (void)
{
return VMS_DEFAULT_VMS_VER;
}

2
gcc/config/vms/vms-protos.h
View file

@ -20,6 +20,8 @@ along with GCC; see the file COPYING3. If not see
/* vms-c.c */
extern void vms_c_register_pragma (void);
extern void vms_c_common_override_options (void);
extern int vms_c_get_crtl_ver (void);
extern int vms_c_get_vms_ver (void);
/* vms.c */
void vms_patch_builtins (void);

28
gcc/config/vms/vms.h
View file

@ -21,19 +21,21 @@ along with GCC; see the file COPYING3. If not see
#define TARGET_OBJECT_SUFFIX ".obj"
#define TARGET_EXECUTABLE_SUFFIX ".exe"
#define TARGET_OS_CPP_BUILTINS() \
do { \
builtin_define_std ("vms"); \
builtin_define_std ("VMS"); \
builtin_assert ("system=vms"); \
SUBTARGET_OS_CPP_BUILTINS(); \
builtin_define ("__int64=long long"); \
if (flag_vms_pointer_size == VMS_POINTER_SIZE_32) \
builtin_define ("__INITIAL_POINTER_SIZE=32"); \
else if (flag_vms_pointer_size == VMS_POINTER_SIZE_64) \
builtin_define ("__INITIAL_POINTER_SIZE=64"); \
if (POINTER_SIZE == 64) \
builtin_define ("__LONG_POINTERS=1"); \
#define TARGET_OS_CPP_BUILTINS() \
do { \
builtin_define_std ("vms"); \
builtin_define_std ("VMS"); \
builtin_assert ("system=vms"); \
SUBTARGET_OS_CPP_BUILTINS(); \
builtin_define ("__int64=long long"); \
if (flag_vms_pointer_size == VMS_POINTER_SIZE_32) \
builtin_define ("__INITIAL_POINTER_SIZE=32"); \
else if (flag_vms_pointer_size == VMS_POINTER_SIZE_64) \
builtin_define ("__INITIAL_POINTER_SIZE=64"); \
if (POINTER_SIZE == 64) \
builtin_define ("__LONG_POINTERS=1"); \
builtin_define_with_int_value ("__CRTL_VER", vms_c_get_crtl_ver ()); \
builtin_define_with_int_value ("__VMS_VER", vms_c_get_vms_ver ()); \
} while (0)
extern void vms_c_register_includes (const char *, const char *, int);