From: jb <jb@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Fri, 7 Sep 2018 18:59:50 +0000 (+0000)
Subject: Remove unused init_unsigned_integer function.
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=0fb27bd82640bbb0a52caa321ca85eb16ae25d62;p=thirdparty%2Fgcc.git

Remove unused init_unsigned_integer function.

As pointed out by Bernhard Reutner-Fischer, this function is unused
since the fix for PR 53796 in November 2017.

2018-09-07  Janne Blomqvist  <jb@gcc.gnu.org>

        * runtime/environ.c (init_unsigned_integer): Remove.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@264163 138bc75d-0d04-0410-961f-82ee72b054a4
---

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 6287b2b9dff9..e13390bd23b8 100644
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,7 @@
+2018-09-07  Janne Blomqvist  <jb@gcc.gnu.org>
+
+	* runtime/environ.c (init_unsigned_integer): Remove.
+
 2018-09-05  Hans-Peter Nilsson  <hp@axis.com>
 
 	* io/async.h: Use __gthread_mutex_t, not pthread_mutex_t.
diff --git a/libgfortran/runtime/environ.c b/libgfortran/runtime/environ.c
index 22faad348da6..484b569f1db2 100644
--- a/libgfortran/runtime/environ.c
+++ b/libgfortran/runtime/environ.c
@@ -98,25 +98,6 @@ init_integer (variable * v)
 }
 
 
-/* Initialize an integer environment variable which has to be positive.  */
-
-static void
-init_unsigned_integer (variable * v)
-{
-  char *p, *q;
-
-  p = getenv (v->name);
-  if (p == NULL)
-    return;
-
-  for (q = p; *q; q++)
-    if (!isdigit (*q))
-      return;
-
-  *v->var = atoi (p);
-}
-
-
 /* Initialize a boolean environment variable. We only look at the first
    letter of the value. */