------- Comment #6 from pault at gcc dot gnu dot org 2009-09-08 10:55 ------- (In reply to comment #5)
> Ah, can you check/commit > > + gfc_add_block_to_block (&block, &lse->pre); > + gfc_add_block_to_block (&block, &rse->pre); > + tmp = gfc_evaluate_now (rse->expr, &block); > + tmp = fold_build1 (VIEW_CONVERT_EXPR, TREE_TYPE (lse->expr), > rse->expr); > ^^^^^^^^ > tmp Richard, Well spotted - it's one of those nasties that are often difficult to see. Tobias, If I do not hear from you, I can commit tonight. Cheers Paul -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41297