https://gcc.gnu.org/bugzilla/show_bug.cgi?id=69651
--- Comment #12 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> --- Author: jvdelisle Date: Mon Feb 15 22:31:13 2016 New Revision: 233436 URL: https://gcc.gnu.org/viewcvs?rev=233436&root=gcc&view=rev Log: 2016-02-15 Jerry DeLisle <jvdeli...@gcc.gnu.org> PR libgfortran/69651 * io/list_read.c: Entire file trailing spaces removed. (CASE_SEPARATORS): Remove '!'. (is_separator): Add namelist mode as condition with '!'. (push_char): Remove un-needed memset. (push_char4): Likewise and remove 'new' pointer. (eat_separator): Remove un-needed use of notify_std. (read_logical): If '!' bang encountered when not in namelist mode got bad_logical to give an error. (read_integer): Likewise reject '!'. (read_character): Remove condition testing c = '!' which is now inside the is_separator macro. (parse_real): Reject '!' unless in namelist mode. (read_complex): Reject '!' unless in namelist mode. (read_real): Likewise reject '!'. PR libgfortran/69651 * gfortran.dg/read_bang.f90: New test. * gfortran.dg/read_bang4.f90: New test. Added: trunk/gcc/testsuite/gfortran.dg/read_bang.f90 trunk/gcc/testsuite/gfortran.dg/read_bang4.f90 Modified: trunk/gcc/testsuite/ChangeLog trunk/libgfortran/ChangeLog trunk/libgfortran/io/list_read.c
