* intrinsics/env.c (getenv): Remove unused variable res_len.

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

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 1a1f937c6bb2e517593c3479adfae872cb4c503c..367eb53f7e73e1099a6704d7509019c82e53bf3e 100644 (file)
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,7 @@
+2014-11-25  Uros Bizjak  <ubizjak@gmail.com>
+
+       * intrinsics/env.c (getenv): Remove unused variable res_len.
+
 2014-11-24  John David Anglin  <danglin@gcc.gnu.org>
 
        * configure.ac: Guard include of <ieeefp.h>.

diff --git a/libgfortran/intrinsics/env.c b/libgfortran/intrinsics/env.c
index ffdc54ac42f7afefd6e94639ebe30043eb7664ea..48ae43ca5c988bc6a6244ec9a0ccb40f6104c632 100644 (file)
--- a/libgfortran/intrinsics/env.c
+++ b/libgfortran/intrinsics/env.c
@@ -42,7 +42,6 @@ PREFIX(getenv) (char * name, char * value, gfc_charlen_type name_len,
 {
   char *name_nt;
   char *res = NULL;
-  int res_len;
 
   if (name == NULL || value == NULL)
     runtime_error ("Both arguments to getenv are mandatory.");