This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/59198] [4.8/4.9 Regression] ICE on cyclically dependent polymorphic types
- From: "anlauf at gmx dot de" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: Wed, 18 Mar 2015 20:21:55 +0000
- Subject: [Bug fortran/59198] [4.8/4.9 Regression] ICE on cyclically dependent polymorphic types
- Auto-submitted: auto-generated
- References: <bug-59198-4 at http dot gcc dot gnu dot org/bugzilla/>
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=59198
Harald Anlauf <anlauf at gmx dot de> changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |anlauf at gmx dot de
--- Comment #23 from Harald Anlauf <anlauf at gmx dot de> ---
(In reply to Paul Thomas from comment #22)
> 2014-03-17 Paul Thomas <pault@gcc.gnu.org>
>
> PR fortran/59198
> * gfortran.dg/proc_ptr_comp_44.f90 : New test
> * gfortran.dg/proc_ptr_comp_45.f90 : New test
>
>
> Added:
> trunk/gcc/testsuite/gfortran.dg/proc_ptr_comp_44.f90
> trunk/gcc/testsuite/gfortran.dg/proc_ptr_comp_45.f90
Paul,
I'm seeing failures of the testcase proc_ptr_comp_45.f90 on my
i686-pc-linux-gnu box. Manually compiling the test with -mfpmath=sse
makes the test pass.
Alternatively, replacing the conditions by:
if (abs (template%obs1_int (arg) - cos (arg)) > 2.e-15) call abort
and
if (abs (object%obs1_int (arg) - cos (arg)) > 2.e-15) call abort
works for me.