[Bug fortran/59700] [4.8/4.9 Regression] Misleading/buggy runtime error message: Bad integer for item 0 in list input

[dominiq at lps dot ens.fr]

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

--- Comment #19 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
Regtested with the patch in comment 17 without failures. Not that an additional

   rewind(fd)
   msg = 'ok'

is needed before

   read(fd, *, err=31, iomsg=msg) i1, x2, a, x1
31 if (msg /= 'Bad repeat count in item 3 of list input') call abort

for the test in comment 6 and it succeeds with this change after the patch.

Thanks Steve and Jerry.