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

[burnus at gcc dot gnu.org]

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

--- Comment #15 from Tobias Burnus <burnus at gcc dot gnu.org> ---
(In reply to Andreas Schwab from comment #14)
> Run it.

First, Jerry, I think you really should also compare the results against the
original string.

Secondly, with the modification, I get for the original string, str and str2
(and 'open(6, encoding="UTF-8")'):
 1a你好b                5
 1a你好b                5
 愱你好b                5

Thus, the namelist read is fine - but the list-directed read is not.