From: Janne Blomqvist <jb@gcc.gnu.org>
Date: Sat, 6 Jan 2018 19:16:55 +0000 (+0200)
Subject: Remove unused variable
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=dd8b1ebf359da84ab41d0c4d1110d8f20d739f7f;p=gcc.git

Remove unused variable

2018-01-06  Janne Blomqvist  <jb@gcc.gnu.org>

        * io/write.c (namelist_write): Remove unused variable "i".

From-SVN: r256314
---

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index f0c151d22b5..cc4625fc2a1 100644
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,7 @@
+2018-01-06  Janne Blomqvist  <jb@gcc.gnu.org>
+
+	* io/write.c (namelist_write): Remove unused variable "i".
+
 2018-01-06  Dominique d'Humieres  <dominiq@lps.ens.fr>
 	    Janne Blomqvist  <jb@gcc.gnu.org>
 
@@ -5,7 +9,7 @@
 	* io/write.c (write_character): Use size_t instead of int for
 	length.
 
-2019-01-05  Janne Blomqvist  <jb@gcc.gnu.org>
+2018-01-05  Janne Blomqvist  <jb@gcc.gnu.org>
 
 	PR fortran/78534
 	* intrinsics/args.c (getarg_i4): Use gfc_charlen_type.
diff --git a/libgfortran/io/write.c b/libgfortran/io/write.c
index 32abbd64e91..ee6b4618445 100644
--- a/libgfortran/io/write.c
+++ b/libgfortran/io/write.c
@@ -2372,7 +2372,6 @@ void
 namelist_write (st_parameter_dt *dtp)
 {
   namelist_info *t1, *t2, *dummy = NULL;
-  index_type i;
   index_type dummy_offset = 0;
   char c;
   char *dummy_name = NULL;