From dd8b1ebf359da84ab41d0c4d1110d8f20d739f7f Mon Sep 17 00:00:00 2001 From: Janne Blomqvist Date: Sat, 6 Jan 2018 21:16:55 +0200 Subject: Remove unused variable 2018-01-06 Janne Blomqvist * io/write.c (namelist_write): Remove unused variable "i". From-SVN: r256314 --- libgfortran/io/write.c | 1 - 1 file changed, 1 deletion(-) (limited to 'libgfortran/io') diff --git a/libgfortran/io/write.c b/libgfortran/io/write.c index 32abbd6..ee6b461 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; -- cgit v1.1