https://gcc.gnu.org/bugzilla/show_bug.cgi?id=65596
Jerry DeLisle <jvdelisle at gcc dot gnu.org> changed:
What |Removed |Added
----------------------------------------------------------------------------
Summary|[4.9 Regression] NAMELIST |[4.9,5.0 Regression]
|bug with f2003: reads too |NAMELIST bug with f2003:
|far |reads too far
--- Comment #4 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
The reason why the code behaves differently between 4.9 and 5.0 is because of
this typo:
Index: unit.c
===================================================================
--- unit.c (revision 221736)
+++ unit.c (working copy)
@@ -608,7 +608,7 @@
u->flags.position = POSITION_ASIS;
u->flags.sign = SIGN_SUPPRESS;
u->flags.decimal = DECIMAL_POINT;
- u->flags.delim = DECIMAL_UNSPECIFIED;
+ u->flags.delim = DELIM_UNSPECIFIED;
u->flags.encoding = ENCODING_DEFAULT;
u->flags.async = ASYNC_NO;
u->flags.round = ROUND_UNSPECIFIED;
