diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index f2b46b35db7..f3b40d64f04 100644
--- 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 5a0bdd951df..8a71888eb82 100644
--- 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.  */