X-Git-Url: http://git.sourceforge.jp/view?a=blobdiff_plain;f=gcc%2Ftestsuite%2Fgfortran.dg%2Fenum_5.f90;h=c5617b8c1ba72d92b04fc1854a5746163400c2ae;hb=bbe6c295cf3aefba0f84f2fc1d1088637dc60930;hp=604e50df44adc2db88d82f9e85707739763fb36f;hpb=e87210bbabb7f59320cfa270596162c3b3f5e4ef;p=pf3gnuchains%2Fgcc-fork.git diff --git a/gcc/testsuite/gfortran.dg/enum_5.f90 b/gcc/testsuite/gfortran.dg/enum_5.f90 index 604e50df44a..c5617b8c1ba 100644 --- a/gcc/testsuite/gfortran.dg/enum_5.f90 +++ b/gcc/testsuite/gfortran.dg/enum_5.f90 @@ -10,6 +10,7 @@ program main enumerator :: blue = 1 end enum junk ! { dg-error "Syntax error" } - blue = 10 ! { dg-error "Expected VARIABLE" } + blue = 10 ! { dg-error " assign to a named constant" } -end program main ! { dg-excess-errors "" } +end program main ! { dg-error "Expecting END ENUM" } + ! { dg-error "Unexpected end of file" "" { target "*-*-*" } 0 }