summaryrefslogtreecommitdiffstats
path: root/gcc/ada/cstreams.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/cstreams.c')
-rw-r--r--gcc/ada/cstreams.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/cstreams.c b/gcc/ada/cstreams.c
index 6411fdc6558..dbff6afe20d 100644
--- a/gcc/ada/cstreams.c
+++ b/gcc/ada/cstreams.c
@@ -53,7 +53,7 @@
int max_path_len = _MAX_PATH;
#elif defined (VMS)
#include <unixlib.h>
-int max_path_len = 255; /* PATH_MAX */
+int max_path_len = 4096; /* PATH_MAX */
#elif defined (__vxworks) || defined (__OPENNT)
@@ -182,7 +182,7 @@ __gnat_full_name (nam, buffer)
#if defined(__EMX__) || defined (__MINGW32__)
/* If this is a device file return it as is; under Windows NT and
OS/2 a device file end with ":". */
- if (nam [strlen (nam) - 1] == ':')
+ if (nam[strlen (nam) - 1] == ':')
strcpy (buffer, nam);
else
{
@@ -211,7 +211,7 @@ __gnat_full_name (nam, buffer)
strcpy (buffer, __gnat_to_host_file_spec (buffer));
else
{
- char nambuffer [MAXPATHLEN];
+ char *nambuffer = alloca (max_path_len);
strcpy (nambuffer, buffer);
strcpy (buffer, getcwd (buffer, max_path_len, 0));
OpenPOWER on IntegriCloud