[Bug libfortran/52539] I/O: Wrong result for UTF-8/UCS-4 list-directed and namelist read and nml write

[jvdelisle at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=52539

--- Comment #7 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
Author: jvdelisle
Date: Sat Apr 26 21:52:26 2014
New Revision: 209828

URL: http://gcc.gnu.org/viewcvs?rev=209828&root=gcc&view=rev
Log:
2014-04-26  Jerry DeLisle  <jvdelisle@gcc.gnu>

    PR libfortran/52539
    * io/list_read.c: Add uchar typedef. (push_char4): New function
    to save kind=4 character. (next_char_utf8): New function to read
    a single UTF-8 encoded character value. (read_chracter): Update
    to use the new functions for reading UTF-8 strings.
    (list_formatted_read_scalar): Update to handle list directed
    reads of UTF-8 strings. (nml_read_obj): Likewise update for
    UTF-8 strings in namelists.
    * io/write.c (nml_write_obj): Add kind=4 character support for
    namelist writes.

Modified:
    trunk/libgfortran/ChangeLog
    trunk/libgfortran/io/list_read.c
    trunk/libgfortran/io/write.c