Commit 7481209d by Tristan Gingold Committed by Tristan Gingold

vms.c (VMS_CRTL_GLOBAL): Define.

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
parent d734e6c4
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> 2011-12-16 Jakub Jelinek <jakub@redhat.com>
PR debug/51557 PR debug/51557
...@@ -63,6 +63,7 @@ ctermid 64 ...@@ -63,6 +63,7 @@ ctermid 64
ctime ctime
dup dup
dup2 dup2
environ GLOBAL
exit exit
exp FLOAT exp FLOAT
fabs FLOAT fabs FLOAT
......
...@@ -45,6 +45,9 @@ along with GCC; see the file COPYING3. If not see ...@@ -45,6 +45,9 @@ along with GCC; see the file COPYING3. If not see
/* Prepend x before the name for printf like functions. */ /* Prepend x before the name for printf like functions. */
#define VMS_CRTL_PRNTF (1 << 4) #define VMS_CRTL_PRNTF (1 << 4)
/* Prepend ga_ for global data. */
#define VMS_CRTL_GLOBAL (1 << 5)
struct vms_crtl_name struct vms_crtl_name
{ {
/* The standard C name. */ /* The standard C name. */
...@@ -123,6 +126,12 @@ vms_patch_builtins (void) ...@@ -123,6 +126,12 @@ vms_patch_builtins (void)
rlen += 9; rlen += 9;
} }
if (n->flags & VMS_CRTL_GLOBAL)
{
memcpy (res + rlen, "ga_", 3);
rlen += 3;
}
if (n->flags & VMS_CRTL_FLOAT) if (n->flags & VMS_CRTL_FLOAT)
res[rlen++] = 't'; res[rlen++] = 't';
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment