real(16) :: a
  print *, sqrt(a)
end

$ ./bin/gfortran a.f90
a.f90: In function ‘MAIN__’:
a.f90:2: internal compiler error: in gfc_get_intrinsic_lib_fndecl, at
fortran/trans-intrinsic.c:499

-- 
           Summary: real(kind=16) and sqrt function cause ICE in print
                    statement
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: coudert at clipper dot ens dot fr
                CC: gcc-bugs at gcc dot gnu dot org
 GCC build triplet: sparc-sun-solaris2.9
  GCC host triplet: sparc-sun-solaris2.9
GCC target triplet: sparc-sun-solaris2.9


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=20120

Reply via email to