[Bug fortran/47878] [4.6 Regression] 187.facerec miscompares

[burnus at gcc dot gnu.org]

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

--- Comment #20 from Tobias Burnus <burnus at gcc dot gnu.org> 2011-02-24 17:41:20 UTC ---
Comment on attachment 23456
  --> http://gcc.gnu.org/bugzilla/attachment.cgi?id=23456
gcc46-pr47878.patch

>+  read (99, '(5i3)') a
>+  if (any (a.ne.(/1, 2, 3, 0, 0/))) call abort 
>+end

I leave the reviewing to Jerry (or Janne), but I would add a
  close(99, status='delete')
to keep the testing directory tidy.