From fd7927cdc6aeb055e30e8f599664e1e7ebf621c9 Mon Sep 17 00:00:00 2001 From: Eric Botcazou Date: Thu, 16 Feb 2006 22:06:06 +0000 Subject: env.c (__gnat_setenv): Use size_t. * env.c (__gnat_setenv): Use size_t. (__gnat_unsetenv): Likewise. (__gnat_clearenv): Likewise. From-SVN: r111155 --- gcc/ada/env.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'gcc/ada/env.c') diff --git a/gcc/ada/env.c b/gcc/ada/env.c index 039e09c..bdba790 100644 --- a/gcc/ada/env.c +++ b/gcc/ada/env.c @@ -170,7 +170,7 @@ __gnat_setenv (char *name, char *value) setenv (name, value, 1); #else - int size = strlen (name) + strlen (value) + 2; + size_t size = strlen (name) + strlen (value) + 2; char *expression; expression = (char *) xmalloc (size * sizeof (char)); @@ -234,7 +234,7 @@ void __gnat_unsetenv (char *name) { As we are still supporting AIX 5.1 we cannot use unsetenv */ char **env = __gnat_environ (); int index = 0; - int size = strlen (name); + size_t size = strlen (name); while (env[index] != NULL) { if (strlen (env[index]) > size) { @@ -258,7 +258,7 @@ void __gnat_unsetenv (char *name) { /* On Windows platform putenv ("key=") is equivalent to unsetenv (a subsequent call to getenv ("key") will return NULL and not the "\0" string */ - int size = strlen (name) + 2; + size_t size = strlen (name) + 2; char *expression; expression = (char *) xmalloc (size * sizeof (char)); @@ -293,7 +293,7 @@ void __gnat_clearenv (void) { environment but there is a "clean" way to unset a variable. So go through the environ table and call __gnat_unsetenv on all entries */ char **env = __gnat_environ (); - int size; + size_t size; while (env[0] != NULL) { size = 0; -- cgit v1.1