Trivial spelling typo fix.
authorPaul Brook <pbrook@gcc.gnu.org>
Fri, 20 Aug 2004 13:53:21 +0000 (13:53 +0000)
committerPaul Brook <pbrook@gcc.gnu.org>
Fri, 20 Aug 2004 13:53:21 +0000 (13:53 +0000)
From-SVN: r86319

gcc/fortran/trans-array.c

index 5299b4c2cdd17dd20cb0d639244a228670e28933..e6c4600b001cdaa718a45c312a58eebbc4102ad1 100644 (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;