diff options
| -rw-r--r-- | libgfortran/ChangeLog | 5 | ||||
| -rw-r--r-- | libgfortran/io/write.c | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 8cc223e..1b2e961 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,8 @@ +2009-09-12 Jerry DeLisle <jvdelisle@gcc.gnu.org> + + PR libgfortran/41219 + * io/write.c (write_a_char4): Use correct type for crlf constant. + 2009-09-11 Ralf Wildenhues <Ralf.Wildenhues@gmx.de> * Makefile.am (libgfortranbegin_la_LINK): New. diff --git a/libgfortran/io/write.c b/libgfortran/io/write.c index 4956da8..3c16a43 100644 --- a/libgfortran/io/write.c +++ b/libgfortran/io/write.c @@ -293,7 +293,7 @@ write_a_char4 (st_parameter_dt *dtp, const fnode *f, const char *source, int len Standard sections 10.6.3 and 9.9 for further information. */ if (is_stream_io (dtp)) { - const char crlf[] = "\r\n"; + const gfc_char4_t crlf[] = {0x000d,0x000a}; int i, bytes; gfc_char4_t *qq; bytes = 0; |