Re: [Patch, Fortran, OOP] PR 49638: [OOP] length parameter is ignored when overriding type bound character functions with constant length.

[Thomas Koenig]

Hi Janus,

+      /* Check string length.  */
+      if (proc_target->result->ts.type == BT_CHARACTER
+       &&  proc_target->result->ts.u.cl&&  old_target->result->ts.u.cl
+       &&  gfc_dep_compare_expr (proc_target->result->ts.u.cl->length,
+                                  old_target->result->ts.u.cl->length) != 0)

This remains incorrect.

Please change that to a warning (at least) if gfc_dep_compare_expr 
returns -2.

Regards

        Thomas