------- Comment #14 from janus at gcc dot gnu dot org 2009-12-10 21:21 -------
Comparing the dump of the test case in comment #9 with and without the patch in
comment #11 shows that with the patch the following is missing:
@@ -25,10 +25,6 @@ MAIN__ ()
integer(kind=4) itmp;
extern struct vtype$t1 vtab$t1;
- if (vtab$t1.prod == 0B)
- {
- vtab$t1.prod = (integer(kind=4) (*<T41d>) (void)) i_m_j;
- }
a.$vptr = &vtab$t1;
a.$data = &b;
itmp = a.$vptr->prod (&a);
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=42274