Trivial spelling typo fix.

From-SVN: r86319
This commit is contained in:
Paul Brook 2004-08-20 13:53:21 +00:00
parent 05d2826595
commit 346d5977dd

View File

@ -3762,7 +3762,7 @@ gfc_conv_array_parameter (gfc_se * se, gfc_expr * expr, gfc_ss * ss, int g77)
if (!sym->attr.pointer && sym->as->type != AS_ASSUMED_SHAPE
&& !sym->attr.allocatable)
{
/* Some variables are declared directly, others are declard as
/* Some variables are declared directly, others are declared as
pointers and allocated on the heap. */
if (sym->attr.dummy || POINTER_TYPE_P (TREE_TYPE (tmp)))
se->expr = tmp;