From 5703e2227de86b3cc825383b9c60aea03a7af039 Mon Sep 17 00:00:00 2001 From: ghazi Date: Fri, 27 Jun 2008 16:55:06 +0000 Subject: * ada-tree.h (SET_TYPE_LANG_SPECIFIC, SET_DECL_LANG_SPECIFIC): Fix -Wc++-compat warnings. * adaint.c (__gnat_locate_regular_file, __gnat_locate_exec, __gnat_locate_exec_on_path): Likewise. * decl.c (annotate_value): Likewise. * misc.c (gnat_handle_option): Likewise. * trans.c (gnat_to_gnu, extract_encoding, decode_name, post_error_ne_tree): Likewise. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@137192 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/ada/adaint.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'gcc/ada/adaint.c') diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c index 391a424a094..8ace0a1c827 100644 --- a/gcc/ada/adaint.c +++ b/gcc/ada/adaint.c @@ -2147,7 +2147,7 @@ char * __gnat_locate_regular_file (char *file_name, char *path_val) { char *ptr; - char *file_path = alloca (strlen (file_name) + 1); + char *file_path = (char *) alloca (strlen (file_name) + 1); int absolute; /* Return immediately if file_name is empty */ @@ -2196,7 +2196,7 @@ __gnat_locate_regular_file (char *file_name, char *path_val) { /* The result has to be smaller than path_val + file_name. */ - char *file_path = alloca (strlen (path_val) + strlen (file_name) + 2); + char *file_path = (char *) alloca (strlen (path_val) + strlen (file_name) + 2); for (;;) { @@ -2245,7 +2245,7 @@ __gnat_locate_exec (char *exec_name, char *path_val) if (!strstr (exec_name, HOST_EXECUTABLE_SUFFIX)) { char *full_exec_name - = alloca (strlen (exec_name) + strlen (HOST_EXECUTABLE_SUFFIX) + 1); + = (char *) alloca (strlen (exec_name) + strlen (HOST_EXECUTABLE_SUFFIX) + 1); strcpy (full_exec_name, exec_name); strcat (full_exec_name, HOST_EXECUTABLE_SUFFIX); @@ -2298,7 +2298,7 @@ __gnat_locate_exec_on_path (char *exec_name) char *path_val = getenv ("PATH"); #endif if (path_val == NULL) return NULL; - apath_val = alloca (strlen (path_val) + 1); + apath_val = (char *) alloca (strlen (path_val) + 1); strcpy (apath_val, path_val); return __gnat_locate_exec (exec_name, apath_val); #endif -- cgit v1.2.1