public inbox for gcc-cvs@sourceware.org
help / color / mirror / Atom feed
* [gcc r12-1459] [Ada] Remove const qualifier on a couple of pointed-to types
@ 2021-06-15 10:21 Pierre-Marie de Rodat
0 siblings, 0 replies; only message in thread
From: Pierre-Marie de Rodat @ 2021-06-15 10:21 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:86347b2d8d48fa2d18658d241f2df54665dac627
commit r12-1459-g86347b2d8d48fa2d18658d241f2df54665dac627
Author: Eric Botcazou <ebotcazou@adacore.com>
Date: Mon Feb 8 12:00:19 2021 +0100
[Ada] Remove const qualifier on a couple of pointed-to types
gcc/ada/
* argv.c: Add include of <stdlib.h> for the runtime.
(gnat_argv): Change type to char ** and initialize to NULL.
(gnat_envp): Likewise.
* argv-lynxos178-raven-cert.c: Add include of <stdlib.h>.
(gnat_argv): Change type to char ** and initialize to NULL.
(gnat_envp): Likewise.
Diff:
---
gcc/ada/argv-lynxos178-raven-cert.c | 5 +++--
gcc/ada/argv.c | 6 +++---
2 files changed, 6 insertions(+), 5 deletions(-)
diff --git a/gcc/ada/argv-lynxos178-raven-cert.c b/gcc/ada/argv-lynxos178-raven-cert.c
index 64850f163ba..21cead39a3e 100644
--- a/gcc/ada/argv-lynxos178-raven-cert.c
+++ b/gcc/ada/argv-lynxos178-raven-cert.c
@@ -41,6 +41,7 @@
minimal support for Ada.Command_Line.Command_Name */
#include <sys/types.h>
+#include <stdlib.h>
#include <string.h>
#ifdef __cplusplus
@@ -53,8 +54,8 @@ extern "C" {
the binder-generated file so they need to be defined here */
int gnat_argc = 0;
-const char **gnat_argv = (const char **) 0;
-const char **gnat_envp = (const char **) 0;
+char **gnat_argv = NULL;
+char **gnat_envp = NULL;
int
__gnat_len_arg (int arg_num)
diff --git a/gcc/ada/argv.c b/gcc/ada/argv.c
index b5ec0df4477..4734415960d 100644
--- a/gcc/ada/argv.c
+++ b/gcc/ada/argv.c
@@ -44,6 +44,7 @@
#ifdef IN_RTS
#include "runtime.h"
+#include <stdlib.h>
#include <string.h>
#else
#include "config.h"
@@ -60,14 +61,13 @@ extern "C" {
envp of the main program is saved under gnat_envp. */
int gnat_argc = 0;
-const char **gnat_argv = (const char **) 0;
-const char **gnat_envp = (const char **) 0;
+char **gnat_argv = NULL;
+char **gnat_envp = NULL;
#if defined (_WIN32) && !defined (RTX)
/* Note that on Windows environment the environ point to a buffer that could
be reallocated if needed. It means that gnat_envp needs to be updated
before using gnat_envp to point to the right environment space */
-#include <stdlib.h>
/* for the environ variable definition */
#define gnat_envp (environ)
#endif
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2021-06-15 10:21 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2021-06-15 10:21 [gcc r12-1459] [Ada] Remove const qualifier on a couple of pointed-to types Pierre-Marie de Rodat
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).