[Bug fortran/44371] [4.6 Regression] STOP parsing rejects valid code

[kargl at gcc dot gnu dot org]

------- Comment #3 from kargl at gcc dot gnu dot org  2010-06-02 02:03 -------
Here's a dejagnu testcase.

! { dg-do run }
  character(1) c, y
  y = 'y'
  read(y,*) c
  if (c=='y') stop; if (c=='Y') stop
  call abort()
  end

The 'dg-do run' could be changed to 'dg-do compile'


-- 


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