[COMMITTED 1/2] testsuite: fix comment-only directive typos

[Sam James]

Doing this to avoid FPs from grepping but also to avoid the potential
for people learning bad habits.

gcc/testsuite/ChangeLog:

        * gfortran.dg/coarray/caf.exp: Fix 'dg-do-run' typo.
        * lib/gfortran-dg.exp: Ditto.
        * lib/gm2-dg.exp: Ditto.
        * lib/go-dg.exp: Ditto.
---
Committed as obvious.

 gcc/testsuite/gfortran.dg/coarray/caf.exp | 2 +-
 gcc/testsuite/lib/gfortran-dg.exp         | 2 +-
 gcc/testsuite/lib/gm2-dg.exp              | 2 +-
 gcc/testsuite/lib/go-dg.exp               | 2 +-
 4 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/gcc/testsuite/gfortran.dg/coarray/caf.exp 
b/gcc/testsuite/gfortran.dg/coarray/caf.exp
index 31c13cd34e5e..9e608ecf83d0 100644
--- a/gcc/testsuite/gfortran.dg/coarray/caf.exp
+++ b/gcc/testsuite/gfortran.dg/coarray/caf.exp
@@ -78,7 +78,7 @@ foreach test [lsort [glob -nocomplain 
$srcdir/$subdir/*.\[fF\]{,90,95,03,08} ]]
     }
 
 # Enable if you want to test several options:
-#    # look if this is dg-do-run test, in which case
+#    # look if this is dg-do run test, in which case
 #    # we cycle through the option list, otherwise we don't
 #    if [expr [search_for $test "dg-do run"]] {
 #      set option_list $torture_with_loops
diff --git a/gcc/testsuite/lib/gfortran-dg.exp 
b/gcc/testsuite/lib/gfortran-dg.exp
index fcba95dc3961..0c578b52684d 100644
--- a/gcc/testsuite/lib/gfortran-dg.exp
+++ b/gcc/testsuite/lib/gfortran-dg.exp
@@ -146,7 +146,7 @@ proc gfortran-dg-runtest { testcases flags 
default-extra-flags } {
            continue
         }
 
-       # look if this is dg-do-run test, in which case
+       # look if this is dg-do run test, in which case
        # we cycle through the option list, otherwise we don't
        if [expr [search_for $test "dg-do run"]] {
            set option_list $torture_with_loops
diff --git a/gcc/testsuite/lib/gm2-dg.exp b/gcc/testsuite/lib/gm2-dg.exp
index 7230143f80e8..0fa26846df84 100644
--- a/gcc/testsuite/lib/gm2-dg.exp
+++ b/gcc/testsuite/lib/gm2-dg.exp
@@ -59,7 +59,7 @@ proc gm2-dg-runtest { testcases flags default-extra-flags } {
            continue
         }
 
-       # look if this is dg-do-run test, in which case
+       # look if this is dg-do run test, in which case
        # we cycle through the option list, otherwise we don't
        if [expr [search_for $test "dg-do run"]] {
            set option_list $TORTURE_OPTIONS
diff --git a/gcc/testsuite/lib/go-dg.exp b/gcc/testsuite/lib/go-dg.exp
index d22835066252..bbc70a2301fd 100644
--- a/gcc/testsuite/lib/go-dg.exp
+++ b/gcc/testsuite/lib/go-dg.exp
@@ -47,7 +47,7 @@ proc go-dg-runtest { testcases flags default-extra-flags } {
            continue
         }
 
-       # look if this is dg-do-run test, in which case
+       # look if this is dg-do run test, in which case
        # we cycle through the option list, otherwise we don't
        if [expr [search_for $test "dg-do run"]] {
            set option_list $TORTURE_OPTIONS
-- 
2.46.2