diff options
| author | dannysmith <dannysmith@138bc75d-0d04-0410-961f-82ee72b054a4> | 2003-10-22 21:34:51 +0000 |
|---|---|---|
| committer | dannysmith <dannysmith@138bc75d-0d04-0410-961f-82ee72b054a4> | 2003-10-22 21:34:51 +0000 |
| commit | f0a28ccbd3dd7601546a27587720799563e5dbb5 (patch) | |
| tree | 1780c9b5b3a2f29ec96b896c364f0c77eb0c06ca /gcc/ada/decl.c | |
| parent | 5a6901d63a598a4992f1bbbf22a7fe1010d76dd6 (diff) | |
| download | gcc-f0a28ccbd3dd7601546a27587720799563e5dbb5.tar.gz | |
* sysdep.c: Include conio.h if __MINGW32__ and !OLD_MINGW.
* ctrl_c.c (__gnat_int_handler): Remove declaration.
* decl.c (creat_concat_name): Const-ify prefix.
* adaint.c: Include ctype.h if __MINGW32__.
(__gnat_readlink): Mark arguments as possibly unused.
(__gnat_symlink): Likewise.
(__gnat_is_symbolic_link): Likewise.
(__gnat_portable_spawn): Likewise. Cast last arg of spawnvp to match
declaration
(__gnat_file_time_name): Don't declare struct stat statbuf when
not needed.
(__gnat_is_absolute_path): Add parenthesis around condition of
'if' statement to avoid warning.
(__gnat_plist_init): Specify void as parameter.
(plist_enter): Likewise.
(plist_leave): Likewise.
(remove_handle): Make static. Initialize prev.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@72824 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/decl.c')
| -rw-r--r-- | gcc/ada/decl.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/decl.c b/gcc/ada/decl.c index dd4b427c2e0..bbad5b50e46 100644 --- a/gcc/ada/decl.c +++ b/gcc/ada/decl.c @@ -6451,7 +6451,7 @@ create_concat_name (gnat_entity, suffix) { Entity_Kind kind = Ekind (gnat_entity); - char *prefix = "_imp__"; + const char *prefix = "_imp__"; int plen = strlen (prefix); if ((kind == E_Variable || kind == E_Constant) |