diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2010-06-02 05:02:07 +0000 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2010-06-02 05:02:07 +0000 |
| commit | a76135dc57c990d12740e4bcc037d96465ce1374 (patch) | |
| tree | 58019fcd72282a412dfbd3e1ad0252981ed14aea /gcc | |
| parent | df842ed971dbe3c2797181b447530244e23f4dee (diff) | |
| download | gcc-a76135dc57c990d12740e4bcc037d96465ce1374.zip gcc-a76135dc57c990d12740e4bcc037d96465ce1374.tar.gz gcc-a76135dc57c990d12740e4bcc037d96465ce1374.tar.bz2 | |
re PR fortran/44371 (STOP parsing rejects valid code)
2010-06-01 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR fortran/44371
* gfortran.dg/error_stop_2.f08: Minor update.
From-SVN: r160135
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/error_stop_2.f08 | 1 |
2 files changed, 6 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 19452bb..cbda12b 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,6 +1,11 @@ 2010-06-01 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR fortran/44371 + * gfortran.dg/error_stop_2.f08: Minor update. + +2010-06-01 Jerry DeLisle <jvdelisle@gcc.gnu.org> + + PR fortran/44371 * gfortran.dg/error_stop_1.f08: New test. * gfortran.dg/error_stop_2.f08: New test. diff --git a/gcc/testsuite/gfortran.dg/error_stop_2.f08 b/gcc/testsuite/gfortran.dg/error_stop_2.f08 index be0255a..8e3e711 100644 --- a/gcc/testsuite/gfortran.dg/error_stop_2.f08 +++ b/gcc/testsuite/gfortran.dg/error_stop_2.f08 @@ -4,6 +4,7 @@ character(1) c, y y = 'y' read(y,*) c + if (c=='x') stop; if (c=='X') stop if (c=='x') stop size(i); if (c=='X') stop if (c=='y') stop size(i) if (c=='Y') stop ! { dg-error "Syntax error in STOP" } |