[Bug fortran/49627] New: NINT(x,16) doesn't work (at all, ever, I don't think)

[Bug fortran/49627] New: NINT(x,16) doesn't work (at all, ever, I don't think)

[marcus.appleby at gmail dot com]

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

           Summary: NINT(x,16) doesn't work (at all, ever, I don't think)
           Product: gcc
           Version: 4.6.1
            Status: UNCONFIRMED
          Severity: blocker
          Priority: P3
         Component: fortran
        AssignedTo: unassigned@gcc.gnu.org
        ReportedBy: marcus.appleby@gmail.com


Created attachment 24672
  --> http://gcc.gnu.org/bugzilla/attachment.cgi?id=24672
very short (5 line) program illlustrating problem

I don't think there is much to say beyond the summary.  I think that when you
wrote the code for this function you never actually checked that it will
produce kind 16 integers.  I have attached a test program which produces a
compiler error.

[Bug fortran/49627] NINT(x,16) doesn't work (at all, ever, I don't think)

[burnus at gcc dot gnu.org]

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

Tobias Burnus <burnus at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
  Attachment #24672|application/octet-stream    |text/plain
          mime type|                            |

--- Comment #1 from Tobias Burnus <burnus at gcc dot gnu.org> 2011-07-04 12:12:25 UTC ---
Comment on attachment 24672
  --> http://gcc.gnu.org/bugzilla/attachment.cgi?id=24672
very short (5 line) program illlustrating problem

Fails with:

test14.f90:4:0: internal compiler error: in build_round_expr, at
fortran/trans-intrinsic.c:393

 388   if (resprec <= LONG_TYPE_SIZE)
 389     longlong = false;
 390   else if (resprec <= LONG_LONG_TYPE_SIZE)
 391     longlong = true;
 392   else
 393     gcc_unreachable ();

I think one needs to replace
  fn = builtin_decl_for_precision (BUILT_IN_LLROUND, argprec);
by something like
  fn = gfc_builtin_decl_for_float_kind (BUILT_IN_LROUND, ...)

[Bug fortran/49627] NINT(x,16) doesn't work (at all, ever, I don't think)

[dfranke at gcc dot gnu.org]

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

Daniel Franke <dfranke at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |dfranke at gcc dot gnu.org
           Severity|blocker                     |normal

--- Comment #2 from Daniel Franke <dfranke at gcc dot gnu.org> 2011-07-24 20:03:56 UTC ---
Fortran bugs are never blockers.

[Bug fortran/49627] NINT(x,16) doesn't work (at all, ever, I don't think)

[dominiq at lps dot ens.fr]

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

Dominique d'Humieres <dominiq at lps dot ens.fr> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2013-01-07
     Ever Confirmed|0                           |1

--- Comment #3 from Dominique d'Humieres <dominiq at lps dot ens.fr> 2013-01-07 23:02:06 UTC ---
Still here at revision 194996:

pr49627.f90: In function 'test14':
pr49627.f90:4:0: internal compiler error: in build_round_expr, at
fortran/trans-intrinsic.c:396
   print*,NINT(x,16)