[Bug fortran/29941] gfortran reports error with len of assumed size character array

[pault at gcc dot gnu dot org]

------- Comment #2 from pault at gcc dot gnu dot org  2006-11-23 17:55 -------
Tobias,

This one liner does the right thing but I have no time right now to do anything
with it:

Index: gcc/fortran/resolve.c
===================================================================
*** gcc/fortran/resolve.c       (revision 119077)
--- gcc/fortran/resolve.c       (working copy)
*************** resolve_function (gfc_expr * expr)
*** 1523,1528 ****
--- 1523,1529 ----
    else if (expr->value.function.actual != NULL
             && expr->value.function.isym != NULL
             && expr->value.function.isym->generic_id != GFC_ISYM_LBOUND
+            && expr->value.function.isym->generic_id != GFC_ISYM_LEN
             && expr->value.function.isym->generic_id != GFC_ISYM_LOC
             && expr->value.function.isym->generic_id != GFC_ISYM_PRESENT)
      {

If you want to regtest it, I would be OK with it being applied as obvious to
trunk, 4.2 and 4.1.

Paul


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=29941