[Bug fortran/41167] ICE with PACK() and string concatenation

[burnus at gcc dot gnu dot org]

------- Comment #2 from burnus at gcc dot gnu dot org  2009-08-25 18:32 -------
In principle, the correct type is (should be) set in resolve_operator:

    case INTRINSIC_CONCAT:
      if (op1->ts.type == BT_CHARACTER && op2->ts.type == BT_CHARACTER
          && op1->ts.kind == op2->ts.kind)
        {
          e->ts.type = BT_CHARACTER;


-- 


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