[Bug fortran/35937] Wrong type for charlength of function

[dominiq at lps dot ens dot fr]

------- Comment #17 from dominiq at lps dot ens dot fr  2008-12-11 10:00 -------
> Hah! My VMware Fedora catches the bug and demonstrates that my simple fix of
> comment #5 does the job; ie. unconditionally do the constant fold to a
> gfc_charlen_type_node.  This can never do any harm!

I have looked a litte bit closer to the patch in comment #4. AFAICT it
implements what gfc_evaluate_now does with the difference that

  var = gfc_create_var (TREE_TYPE (expr), NULL);

is replaced with

 +           tree tmp = gfc_create_var (gfc_charlen_type_node, "slength");

Has "slength" any chance to make a difference compared to NULL?


-- 


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