diff mbox

[committed,-,vms] Add new translations

Message ID E78755F6-4FB5-495E-B07F-832483C5832F@adacore.com
State New
Headers show

Commit Message

Tristan Gingold Oct. 21, 2010, 8:45 a.m. UTC
Hi,

on VMS, symbols defined by shared libraries are prefixed (by decc$ for the C run-time) and sometimes mangled.
This patch adds new translations used by the GNAT runtime to avoid to special case VMS.

Committed on trunk.

Tristan.

2010-10-21  Tristan Gingold  <gingold@adacore.com>

	* config/vms/vms-crtl.h (CRTL_NAMES): Add new translations.
	* config/vms/vms-crtl-64.h (CRTL_NAMES): Ditto.
diff mbox

Patch

Index: gcc/config/vms/vms-crtl-64.h
===================================================================
--- gcc/config/vms/vms-crtl-64.h	(revision 165750)
+++ gcc/config/vms/vms-crtl-64.h	(working copy)
@@ -89,10 +89,12 @@ 
 {"getenv",       "decc$getenv",       0},   \
 {"geteuid",      "decc$geteuid",      0},   \
 {"getgid",       "decc$getgid",       0},   \
+{"gethostbyaddr","decc$gethostbyaddr",0},   \
 {"gethostbyname","decc$gethostbyname",0},   \
 {"getpagesize",  "decc$getpagesize",  0},   \
 {"getpid",       "decc$getpid",       0},   \
 {"getservbyname","decc$getservbyname",0},   \
+{"getservbyport","decc$getservbyport",0},   \
 {"gettimeofday", "decc$gettimeofday", 0},   \
 {"getuid",       "decc$getuid",       0},   \
 {"htons",        "decc$htons",        0},   \
@@ -117,6 +119,7 @@ 
 {"mmap",         "decc$_mmap64",      0},   \
 {"munmap",       "decc$munmap",       0},   \
 {"nl_langinfo",  "decc$nl_langinfo",  0},   \
+{"open",         "decc$open",         0},   \
 {"pclose",       "decc$pclose",       0},   \
 {"popen",        "decc$popen",        0},   \
 {"pow",          "decc$tpow",         0},   \
@@ -128,11 +131,13 @@ 
 {"realloc",      "decc$realloc",      0},   \
 {"recv",         "decc$recv",         0},   \
 {"recvfrom",     "decc$recvfrom",     0},   \
+{"recvmsg",      "decc$__bsd44___recvmsg64", 0}, \
 {"rename",       "decc$rename",       0},   \
 {"rewind",       "decc$rewind",       0},   \
 {"rindex",       "decc$_rindex64",    0},   \
 {"rmdir",        "decc$rmdir",        0},   \
 {"send",         "decc$send",         0},   \
+{"sendmsg",      "decc$__bsd44___sendmsg64", 0}, \
 {"sendto",       "decc$sendto",       0},   \
 {"setenv",       "decc$setenv",       0},   \
 {"setlocale",    "decc$setlocale",    0},   \
Index: gcc/config/vms/vms-crtl.h
===================================================================
--- gcc/config/vms/vms-crtl.h	(revision 165750)
+++ gcc/config/vms/vms-crtl.h	(working copy)
@@ -86,10 +86,12 @@ 
 {"getenv",       "decc$getenv",       0},   \
 {"geteuid",      "decc$geteuid",      0},   \
 {"getgid",       "decc$getgid",       0},   \
+{"gethostbyaddr","decc$gethostbyaddr",0},   \
 {"gethostbyname","decc$gethostbyname",0},   \
 {"getpagesize",  "decc$getpagesize",  0},   \
 {"getpid",       "decc$getpid",       0},   \
 {"getservbyname","decc$getservbyname",0},   \
+{"getservbyport","decc$getservbyport",0},   \
 {"gettimeofday", "decc$gettimeofday", 0},   \
 {"getuid",       "decc$getuid",       0},   \
 {"htons",        "decc$htons",        0},   \
@@ -114,6 +116,7 @@ 
 {"mmap",         "decc$mmap",         0},   \
 {"munmap",       "decc$munmap",       0},   \
 {"nl_langinfo",  "decc$nl_langinfo",  0},   \
+{"open",         "decc$open",         0},   \
 {"pclose",       "decc$pclose",       0},   \
 {"popen",        "decc$popen",        0},   \
 {"pow",          "decc$tpow",         0},   \
@@ -125,11 +128,13 @@ 
 {"realloc",      "decc$realloc",      0},   \
 {"recv",         "decc$recv",         0},   \
 {"recvfrom",     "decc$recvfrom",     0},   \
+{"recvmsg",      "decc$__bsd44___recvmsg32", 0}, \
 {"rename",       "decc$rename",       0},   \
 {"rewind",       "decc$rewind",       0},   \
 {"rindex",       "decc$rindex",       0},   \
 {"rmdir",        "decc$rmdir",        0},   \
 {"send",         "decc$send",         0},   \
+{"sendmsg",      "decc$__bsd44___sendmsg32", 0}, \
 {"sendto",       "decc$sendto",       0},   \
 {"setenv",       "decc$setenv",       0},   \
 {"setlocale",    "decc$setlocale",    0},   \