This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[patch, fortran, committed] commentary typo fix


On Mon, Nov 20, 2006 at 03:33:32PM +0100, Bernhard Fischer wrote:
>Hi,
>
>I intend to commit the attached patch as obvious in a day or two.
>
>2006-11-20  Bernhard Fischer  <aldot@gcc.gnu.org>
>
>        * trans-array.c (gfc_trans_create_temp_array): Commentary typo fix.
>
>thanks,

Applied to trunk as r120550.

>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 Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]