[Bug fortran/20120] real(kind=16) and sqrt function cause ICE in print statement

[coudert at clipper dot ens dot fr]

------- Additional Comments From coudert at clipper dot ens dot fr  2005-02-21 14:21 -------
Same happens with kind=10 on i686-linux-gnu:
  real(10) :: a, b
  b = sqrt(a)
  end

>From gfc_get_intrinsic_lib_fndecl:
  if (ts->type == BT_REAL)
    {
      switch (ts->kind)
        {
        case 4:
          pdecl = &m->real4_decl;
          break;
        case 8:
          pdecl = &m->real8_decl;
          break;
        default:
          gcc_unreachable ();
        }
    }

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
 GCC target triplet|sparc-sun-solaris2.9,       |sparc-sun-solaris2.9,
                   |powerpc-darwin              |powerpc-darwin, i686-gnu-
                   |                            |linux


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