Index: gcc-4.3/gcc/fortran/trans-array.c
===================================================================
--- gcc-4.3/gcc/fortran/trans-array.c	(revision 119010)
+++ gcc-4.3/gcc/fortran/trans-array.c	(working copy)
@@ -671,7 +671,7 @@ gfc_trans_create_temp_array (stmtblock_t
 
       if (function)
 	{
-	  /* Check wether the size for this dimension is negative.  */
+	  /* Check whether the size for this dimension is negative.  */
 	  cond = fold_build2 (LE_EXPR, boolean_type_node, tmp,
 			  gfc_index_zero_node);
 
@@ -3189,7 +3189,7 @@ gfc_array_init_size (tree descriptor, in
       /* Calculate the size of this dimension.  */
       size = fold_build2 (PLUS_EXPR, gfc_array_index_type, se.expr, size);
 
-      /* Check wether the size for this dimension is negative.  */
+      /* Check whether the size for this dimension is negative.  */
       cond = fold_build2 (LE_EXPR, boolean_type_node, size,
 			  gfc_index_zero_node);
       if (n == 0)
Index: gcc-4.3/gcc/fortran/data.c
===================================================================
--- gcc-4.3/gcc/fortran/data.c	(revision 119010)
+++ gcc-4.3/gcc/fortran/data.c	(working copy)
@@ -386,7 +386,7 @@ gfc_assign_data_value (gfc_expr * lvalue
 		    init : rvalue;
 #endif
 	  gfc_notify_std (GFC_STD_GNU, "Extension: re-initialization "
-			  "of '%s' at %L",  symbol->name, &expr->where);
+			  "of '%s' at %L", symbol->name, &expr->where);
 	}
 
       expr = gfc_copy_expr (rvalue);