------- 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

Reply via email to