On Apr 10, 2011, at 4:54 AM, Jim Meyering wrote:
> I've noticed/fixed a few occurrences of doubled words like "the the",
> "to to"
I fixed all the non-surious matches in the gcc/testsuite. if if in the fortran
testsuite was the major spurious match. Thanks.
Index: gcc.target/mips/inter/mips16_stubs_1_x.c
===================================================================
--- gcc.target/mips/inter/mips16_stubs_1_x.c (revision 172244)
+++ gcc.target/mips/inter/mips16_stubs_1_x.c (working copy)
@@ -89,7 +89,7 @@
#define CHECK_RESULT(x, y) if ((x) != (y)) abort ()
#define CHECK_VOID_RESULT(x, y) CHECK_RESULT (((x), the_result), y)
-/* Call functions through pointers and and check against expected results. */
+/* Call functions through pointers and check against expected results. */
void
test (void)
{
Index: gfortran.dg/func_result_1.f90
===================================================================
--- gfortran.dg/func_result_1.f90 (revision 172244)
+++ gfortran.dg/func_result_1.f90 (working copy)
@@ -1,5 +1,5 @@
! { dg-do run }
-! From PR 19673 : We didn't dereference the the result from POINTER
+! From PR 19673 : We didn't dereference the result from POINTER
! functions with a RESULT clause
program ret_ptr
if (foo(99) /= bar(99)) call abort ()
Index: gfortran.dg/use_rename_1.f90
===================================================================
--- gfortran.dg/use_rename_1.f90 (revision 172244)
+++ gfortran.dg/use_rename_1.f90 (working copy)
@@ -1,6 +1,6 @@
! { dg-do compile }
! Tests the fix for PR34854, in which the second of the two subroutines would
fail
-! because the the type declaration of nmoltype_phase would incorrectly conflict
+! because the type declaration of nmoltype_phase would incorrectly conflict
! with the type given to the module variable of the same name.
!
! Contributed by Francois-Xavier Coudert <fxcoud...@gcc.gnu.org>
Index: gfortran.dg/missing_derived_type_1.f90
===================================================================
--- gfortran.dg/missing_derived_type_1.f90 (revision 172244)
+++ gfortran.dg/missing_derived_type_1.f90 (working copy)
@@ -1,5 +1,5 @@
! { dg-do compile }
-! Tests the fix for PR29364, in which the the absence of the derived type
+! Tests the fix for PR29364, in which the absence of the derived type
! 'nonexist' was not diagnosed.
!
! Contributed by Tobias Burnus <tobias.bur...@physik.fu-berlin.de>
Index: gcc.c-torture/execute/990826-0.x
===================================================================
--- gcc.c-torture/execute/990826-0.x (revision 172244)
+++ gcc.c-torture/execute/990826-0.x (working copy)
@@ -1,7 +1,7 @@
# XFAIL this test for AIX using -msoft-float.
# This test calls the system libm.a function floor.
# A false failure is reported if -msoft-float is used.
-# AIX expects the the parameters to be passed in fp regs.
+# AIX expects the parameters to be passed in fp regs.
if { [istarget powerpc-*-aix*] || [istarget rs6000-*-aix*] } {
set torture_eval_before_execute {
global compiler_conditional_xfail_data
Index: gcc.c-torture/execute/980709-1.x
===================================================================
--- gcc.c-torture/execute/980709-1.x (revision 172244)
+++ gcc.c-torture/execute/980709-1.x (working copy)
@@ -1,7 +1,7 @@
# XFAIL this test for AIX using -msoft-float.
# This test calls the system libm.a function pow.
# A false failure is reported if -msoft-float is used.
-# AIX expects the the parameters to be passed in fp regs.
+# AIX expects the parameters to be passed in fp regs.
if { [istarget powerpc-*-aix*] || [istarget rs6000-*-aix*] } {
set torture_eval_before_execute {
global compiler_conditional_xfail_data
Index: gcc.c-torture/compile/20011106-2.c
===================================================================
--- gcc.c-torture/compile/20011106-2.c (revision 172244)
+++ gcc.c-torture/compile/20011106-2.c (working copy)
@@ -1,4 +1,4 @@
-/* Test the the type of a component of a conditional expression between
+/* Test the type of a component of a conditional expression between
two structures is correct. */
/* Origin: Joseph Myers <js...@cam.ac.uk>. */
Index: ada/acats/tests/c4/c460011.a
===================================================================
--- ada/acats/tests/c4/c460011.a (revision 172244)
+++ ada/acats/tests/c4/c460011.a (working copy)
@@ -37,7 +37,7 @@
-- and greater than the value of the mod.
-- Declare a generic test procedure and instantiate it for each of the
-- unsigned types for each operand type.
--- Check that the the operand is properly rounded during the conversion.
+-- Check that the operand is properly rounded during the conversion.
--
-- APPLICABILITY CRITERIA:
-- This test is applicable to all implementations which support
Index: ada/acats/tests/c9/c954013.a
===================================================================
--- ada/acats/tests/c9/c954013.a (revision 172244)
+++ ada/acats/tests/c9/c954013.a (working copy)
@@ -363,7 +363,7 @@
-- Show that this message did pass through the Distributor Task
Transaction.TC_Thru_Dist := true;
- -- Pass this transaction on the the appropriate computation
+ -- Pass this transaction on the appropriate computation
-- task
case Transaction.Code is
when Credit =>
Index: gcc.dg/vect/vect-peel-1.c
===================================================================
--- gcc.dg/vect/vect-peel-1.c (revision 172244)
+++ gcc.dg/vect/vect-peel-1.c (working copy)
@@ -14,10 +14,10 @@
int i;
int ia[N+1];
- /* All the accesses are misaligned. With cost model disabled, we count the
- the number of aligned accesses for each peeling option, and in this case
- we align the two loads if possible (i.e., if misaligned stores are
- supported). */
+ /* All the accesses are misaligned. With cost model disabled, we
+ count the number of aligned accesses for each peeling option, and
+ in this case we align the two loads if possible (i.e., if
+ misaligned stores are supported). */
for (i = 1; i <= N; i++)
{
ia[i] = ib[i+2] + ib[i+6];
Index: objc-obj-c++-shared/objc-test-suite-next-encode-assist-impl.h
===================================================================
--- objc-obj-c++-shared/objc-test-suite-next-encode-assist-impl.h
(revision 172244)
+++ objc-obj-c++-shared/objc-test-suite-next-encode-assist-impl.h
(working copy)
@@ -676,7 +676,7 @@
&& *ntype++ != '=')
/* do nothing */;
- /* If there's a "<name>=", ntype - 1 points to '='; skip the the name */
+ /* If there's a "<name>=", ntype - 1 points to '='; skip the name */
if (*(ntype - 1) == '=')
type = ntype;
Index: objc/execute/next_mapping.h
===================================================================
--- objc/execute/next_mapping.h (revision 172244)
+++ objc/execute/next_mapping.h (working copy)
@@ -749,7 +749,7 @@
&& *ntype++ != '=')
/* do nothing */;
- /* If there's a "<name>=", ntype - 1 points to '='; skip the the name */
+ /* If there's a "<name>=", ntype - 1 points to '='; skip the name */
if (*(ntype - 1) == '=')
type = ntype;
