------- Comment #4 from dominiq at lps dot ens dot fr 2010-01-10 14:37 -------
Diff between the results of -fdump-tree-original with (good) and without (bad)
the patch in
http://gcc.gnu.org/ml/fortran/2009-12/msg00232.html reverted:
[macbook] f90/bug% diff -up pr42680.f90.003t.original_good
pr42680.f90.003t.original_bad
--- pr42680.f90.003t.original_good 2010-01-10 15:32:25.000000000 +0100
+++ pr42680.f90.003t.original_bad 2010-01-10 15:33:03.000000000 +0100
@@ -11,7 +11,7 @@ cg (struct .class.gradient_class & restr
{
struct .class.inner_product_class ip_save;
- ip_save = g_initial->$vptr->inquire_inner_product ((struct
.class.gradient_class *) g_initial);
+ ip_save = VIEW_CONVERT_EXPR<struct
.class.inner_product_class>(g_initial->$vptr->to_vector ((struct
.class.gradient_class *) g_initial));
}
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=42680
