diff options
| author | Steven G. Kargl <kargls@comcast.net> | 2006-07-25 05:08:33 +0000 |
|---|---|---|
| committer | Steven G. Kargl <kargl@gcc.gnu.org> | 2006-07-25 05:08:33 +0000 |
| commit | a72a078396a5a44e62f0a991b81bac3638e8c29e (patch) | |
| tree | cd4e2c7f2ed1b728577e8961bc20614289f2166c /gcc | |
| parent | 709f9dcf15b2efc1962f941bdc763d8f9bd57128 (diff) | |
| download | gcc-a72a078396a5a44e62f0a991b81bac3638e8c29e.zip gcc-a72a078396a5a44e62f0a991b81bac3638e8c29e.tar.gz gcc-a72a078396a5a44e62f0a991b81bac3638e8c29e.tar.bz2 | |
arithmetic_if.f90: Fix comments.
2006-07-24 Steven G. Kargl <kargls@comcast.net>
* gfortran.dg/arithmetic_if.f90: Fix comments.
From-SVN: r115732
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/arithmetic_if.f90 | 6 |
2 files changed, 7 insertions, 3 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 6ca06c6..00fd5b8 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2006-07-24 Steven G. Kargl <kargls@comcast.net> + + * gfortran.dg/arithmetic_if.f90: Fix comments. + 2006-07-24 Volker Reichelt <reichelt@igpm.rwth-aachen.de> PR c++/27572 diff --git a/gcc/testsuite/gfortran.dg/arithmetic_if.f90 b/gcc/testsuite/gfortran.dg/arithmetic_if.f90 index dc8645f..16dccae 100644 --- a/gcc/testsuite/gfortran.dg/arithmetic_if.f90 +++ b/gcc/testsuite/gfortran.dg/arithmetic_if.f90 @@ -12,15 +12,15 @@ program pr28439 integer myfunc - if (myfunc(0)) 10, 20, 30 ! Should go to 10 + if (myfunc(0)) 10, 20, 30 ! Should go to 30 10 call abort 20 call abort -30 if (myfunc(0)) 40, 50, 60 ! Should go to 20 +30 if (myfunc(0)) 40, 50, 60 ! Should go to 50 40 call abort 60 call abort -50 if (myfunc(0)) 70, 80, 90 ! Should go to 30 +50 if (myfunc(0)) 70, 80, 90 ! Should go to 70 80 call abort 90 call abort |