adaint.c (__gnat_locate_exec_on_path): Use const char * instead of char * for path_va...

	* adaint.c (__gnat_locate_exec_on_path): Use const char * instead
	of char * for path_val to avoid warnings.

From-SVN: r232448

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index f2b46b35db7bcd3e597c97c01924f507248c78e0..f3b40d64f045cd5b5113b58c2d1c3fa59a8f29bb 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,8 @@
+2016-01-15  Jakub Jelinek  <jakub@redhat.com>
+
+       * adaint.c (__gnat_locate_exec_on_path): Use const char * instead
+       of char * for path_val to avoid warnings.
+
 2016-01-06  Pierre-Marie de Rodat  <derodat@adacore.com>
 
        * gcc-interface/utils.c: Bump copyright year.

diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c
index 5a0bdd951df54cf80195b4916a1de5986fa39cbe..8a71888eb82f42b3c34c5813dd0f5a59186dfb51 100644 (file)
--- a/gcc/ada/adaint.c
+++ b/gcc/ada/adaint.c
@@ -2791,7 +2791,7 @@ __gnat_locate_exec_on_path (char *exec_name)
   WS2SC (apath_val, wapath_val, EXPAND_BUFFER_SIZE);
 
 #else
-  char *path_val = getenv ("PATH");
+  const char *path_val = getenv ("PATH");
 
   /* If PATH is not defined, proceed with __gnat_locate_exec anyway, so we can
      find files that contain directory names.  */