Index: expr.c
===================================================================
RCS file: /cvs/gcc/gcc/gcc/fortran/expr.c,v
retrieving revision 1.21
diff -u -u -r1.21 expr.c
--- expr.c	8 Feb 2005 13:40:59 -0000	1.21
+++ expr.c	20 Feb 2005 18:24:58 -0000
@@ -618,7 +618,7 @@
     {
       e->ts = op1->ts;
 
-      /* Special cose for ** operator.  */
+      /* Special case for ** operator.  */
       if (e->operator == INTRINSIC_POWER)
 	goto done;