This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
[gfortran, committed] Trivial typo fix
- From: Tobias Schlüter <tobias dot schlueter at physik dot uni-muenchen dot de>
- To: Fortran List <fortran at gcc dot gnu dot org>, gcc-patches <gcc-patches at gcc dot gnu dot org>
- Date: Sat, 06 Oct 2007 14:20:23 +0200
- Subject: [gfortran, committed] Trivial typo fix
I committed this patch under the obviously correct rule, it fixes a
copy'n'pasto where the string "SCAN" should have been replaced by "SIZE".
Built & tested, committed as r129053.
Cheers,
- Tobi
Index: gcc/fortran/ChangeLog
===================================================================
--- gcc/fortran/ChangeLog (revision 129052)
+++ gcc/fortran/ChangeLog (working copy)
@@ -1,5 +1,9 @@
2007-10-06 Tobias Schlüter <tobi@gcc.gnu.org>
+ * simplify.c (gfc_simplify_size): Fix typo.
+
+2007-10-06 Tobias Schlüter <tobi@gcc.gnu.org>
+
PR fortran/25076
* resolve.c (gfc_find_forall_index): Move towards top,
renaming to ...
Index: gcc/fortran/simplify.c
===================================================================
--- gcc/fortran/simplify.c (revision 129052)
+++ gcc/fortran/simplify.c (working copy)
@@ -3651,7 +3651,7 @@ gfc_simplify_size (gfc_expr *array, gfc_
mpz_t size;
gfc_expr *result;
int d;
- int k = get_kind (BT_INTEGER, kind, "SCAN", gfc_default_integer_kind);
+ int k = get_kind (BT_INTEGER, kind, "SIZE", gfc_default_integer_kind);
if (k == -1)
return &gfc_bad_expr;