From b495ad7f55d1acba403e4d6e53fe38626d91be10 Mon Sep 17 00:00:00 2001 From: Jerry DeLisle Date: Sat, 12 Sep 2009 15:08:27 +0000 Subject: re PR fortran/41219 (libgfortran build warnings) 2009-09-12 Jerry DeLisle PR libgfortran/41219 * io/write.c (write_a_char4): Use correct type for crlf constant. From-SVN: r151653 --- libgfortran/ChangeLog | 5 +++++ libgfortran/io/write.c | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) 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 + + PR libgfortran/41219 + * io/write.c (write_a_char4): Use correct type for crlf constant. + 2009-09-11 Ralf Wildenhues * 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; -- cgit v1.1