Message ID | 52F3F271.3010002@justemail.net |
---|---|
State | New |
Headers | show |
Index: fortran/resolve.c =================================================================== --- fortran/resolve.c (revision 207551) +++ fortran/resolve.c (working copy) @@ -9218,7 +9218,7 @@ /* F2008, Section 7.2.1.2. */ if (gfc_is_coindexed (lhs) && gfc_has_ultimate_allocatable (lhs)) { - gfc_error ("Coindexed variable must not be have an allocatable ultimate " + gfc_error ("Coindexed variable must not have an allocatable ultimate " "component in assignment at %L", &lhs->where); return false; }