* io/write.c (namelist_write): Correct type in previous commit.

From-SVN: r107564

* io/write.c (namelist_write): Correct type in previous commit.
From-SVN: r107564
b87ff335 · Francois-Xavier Coudert · François-Xavier Coudert · 8824fd4c · b87ff335 · b87ff335
Commit b87ff335 authored Nov 27, 2005 by Francois-Xavier Coudert Committed by François-Xavier Coudert Nov 27, 2005
Hide whitespace changes
Inline Side-by-side

Showing with 6 additions and 1 deletions

libgfortran/ChangeLog
+5 -0

libgfortran/io/write.c
+1 -1

No files found.
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
 2005-11-27  Francois-Xavier Coudert  <coudert@clipper.ens.fr>

+	* io/write.c (namelist_write): Correct type in previous
+	commit.
+
+2005-11-27  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
+
 	PR libfortran/24919
 	* io/list_read.c (eat_separator, finish_separator,
 	read_character): Handle CRLF separators correctly during reads.

--- a/libgfortran/io/write.c
+++ b/libgfortran/io/write.c
@@ -1817,7 +1817,7 @@ namelist_write (st_parameter_dt *dtp)
 	}
    }
 #ifdef HAVE_CRLF
-  write_character (dtp, "  /\r\n ", 5);
+  write_character (dtp, "  /\r\n", 5);
 #else
  write_character (dtp, "  /\n", 4);
 #endif