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

vms.c (VMS_CRTL_GLOBAL): Define.

Browse source 
2011-12-16  Tristan Gingold  <gingold@adacore.com>

	* config/vms/vms.c (VMS_CRTL_GLOBAL): Define.
	(vms_patch_builtins): Handle.
	* config/vms/vms-crtlmap.map: Add an entry for environ.

From-SVN: r182405
This commit is contained in:
Tristan Gingold 2011-12-16 15:25:30 +00:00 • committed by Tristan Gingold
parent d734e6c466
commit 7481209d17
3 changed files with 16 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
gcc/ChangeLog
View file

@ -1,3 +1,9 @@
2011-12-16 Tristan Gingold <gingold@adacore.com>
* config/vms/vms.c (VMS_CRTL_GLOBAL): Define.
(vms_patch_builtins): Handle.
* config/vms/vms-crtlmap.map: Add an entry for environ.
2011-12-16 Jakub Jelinek <jakub@redhat.com>
PR debug/51557

1
gcc/config/vms/vms-crtlmap.map
View file

@ -63,6 +63,7 @@ ctermid 64
ctime
dup
dup2
environ GLOBAL
exit
exp FLOAT
fabs FLOAT

9
gcc/config/vms/vms.c
View file

@ -45,6 +45,9 @@ along with GCC; see the file COPYING3. If not see
/* Prepend x before the name for printf like functions. */
#define VMS_CRTL_PRNTF (1 << 4)
/* Prepend ga_ for global data. */
#define VMS_CRTL_GLOBAL (1 << 5)
struct vms_crtl_name
{
/* The standard C name. */
@ -123,6 +126,12 @@ vms_patch_builtins (void)
rlen += 9;
}
if (n->flags & VMS_CRTL_GLOBAL)
{
memcpy (res + rlen, "ga_", 3);
rlen += 3;
}
if (n->flags & VMS_CRTL_FLOAT)
res[rlen++] = 't';