https://gcc.gnu.org/bugzilla/show_bug.cgi?id=61640
--- Comment #4 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> --- Full patch submitted to gfortran list. The problem found in this PR was masking a problem in eat_spaces for KIND=4. Was missing some parenthesis for the indexing into the internal unit.