diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 6ca06c69ca6..00fd5b8e53b 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 dc8645fd81f..16dccae03fc 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