public inbox for gcc-bugs@sourceware.org help / color / mirror / Atom feed
* [Bug fortran/17117] New: Unimplemented intrinsic HUGE / Unimplemented intrinsic TINY @ 2004-08-20 7:27 c dot lemmen at fz-juelich dot de 2004-08-20 9:11 ` [Bug fortran/17117] " pinskia at gcc dot gnu dot org ` (3 more replies) 0 siblings, 4 replies; 5+ messages in thread From: c dot lemmen at fz-juelich dot de @ 2004-08-20 7:27 UTC (permalink / raw) To: gcc-bugs Both intrinsics HUGE and TINY are currently not implemented (not in g77 either). And they are not marked gfc_todo; shouldn't they appear there? TINY returns the smallest positive value for a real argument HUGE returns the largest number in the integer or real numeric model ***** Excerpt from cray manpage ************ NAME TINY - Returns the smallest positive value for a real argument model SYNOPSIS TINY ([X=]x) STANDARDS Fortran DESCRIPTION The TINY intrinsic function returns the smallest positive number in the real number model that represents number of the same type and kind type parameter as the argument. For more information on the real number model, see the MODELS(3I) man page. It accepts the following argument: x Must be of type real. It may be scalar or array valued. TINY is an inquiry function. The name of this intrinsic cannot be passed as an argument. RETURN VALUES The result is a scalar with the same type and kind type parameter as x. The result has the value e sub min-1 b , where b and e min (represented as "e sub min" in the previous equation) are as defined in the real number model, which represents numbers of the same type and kind type parameter as x. -- Summary: Unimplemented intrinsic HUGE / Unimplemented intrinsic TINY Product: gcc Version: 3.5.0 Status: UNCONFIRMED Severity: normal Priority: P2 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: c dot lemmen at fz-juelich dot de CC: gcc-bugs at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17117 ^ permalink raw reply [flat|nested] 5+ messages in thread
* [Bug fortran/17117] Unimplemented intrinsic HUGE / Unimplemented intrinsic TINY 2004-08-20 7:27 [Bug fortran/17117] New: Unimplemented intrinsic HUGE / Unimplemented intrinsic TINY c dot lemmen at fz-juelich dot de @ 2004-08-20 9:11 ` pinskia at gcc dot gnu dot org 2004-08-20 9:14 ` pinskia at gcc dot gnu dot org ` (2 subsequent siblings) 3 siblings, 0 replies; 5+ messages in thread From: pinskia at gcc dot gnu dot org @ 2004-08-20 9:11 UTC (permalink / raw) To: gcc-bugs ------- Additional Comments From pinskia at gcc dot gnu dot org 2004-08-20 09:11 ------- The man pages are at: <http://www.cray.com/cgi-bin/swpubs/craydoc30/manpage_display.cgi? id=tiny&PL=libintm&Rel=52&Cat=3&Vol=3i> and <http://www.cray.com/cgi-bin/swpubs/craydoc30/ manpage_display.cgi?id=huge&PL=libintm&Rel=52&Cat=3&Vol=3i>. Confirmed. -- What |Removed |Added ---------------------------------------------------------------------------- Severity|normal |enhancement Status|UNCONFIRMED |NEW Ever Confirmed| |1 Last reconfirmed|0000-00-00 00:00:00 |2004-08-20 09:11:06 date| | http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17117 ^ permalink raw reply [flat|nested] 5+ messages in thread
* [Bug fortran/17117] Unimplemented intrinsic HUGE / Unimplemented intrinsic TINY 2004-08-20 7:27 [Bug fortran/17117] New: Unimplemented intrinsic HUGE / Unimplemented intrinsic TINY c dot lemmen at fz-juelich dot de 2004-08-20 9:11 ` [Bug fortran/17117] " pinskia at gcc dot gnu dot org @ 2004-08-20 9:14 ` pinskia at gcc dot gnu dot org 2004-08-20 16:19 ` sgk at troutmask dot apl dot washington dot edu 2004-08-20 16:22 ` pinskia at gcc dot gnu dot org 3 siblings, 0 replies; 5+ messages in thread From: pinskia at gcc dot gnu dot org @ 2004-08-20 9:14 UTC (permalink / raw) To: gcc-bugs ------- Additional Comments From pinskia at gcc dot gnu dot org 2004-08-20 09:14 ------- I should note that we have actually have almost an implentation of HUGE in gfortran already, used for AINT and ANINT. Likewise for TINY in SPACING. -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17117 ^ permalink raw reply [flat|nested] 5+ messages in thread
* [Bug fortran/17117] Unimplemented intrinsic HUGE / Unimplemented intrinsic TINY 2004-08-20 7:27 [Bug fortran/17117] New: Unimplemented intrinsic HUGE / Unimplemented intrinsic TINY c dot lemmen at fz-juelich dot de 2004-08-20 9:11 ` [Bug fortran/17117] " pinskia at gcc dot gnu dot org 2004-08-20 9:14 ` pinskia at gcc dot gnu dot org @ 2004-08-20 16:19 ` sgk at troutmask dot apl dot washington dot edu 2004-08-20 16:22 ` pinskia at gcc dot gnu dot org 3 siblings, 0 replies; 5+ messages in thread From: sgk at troutmask dot apl dot washington dot edu @ 2004-08-20 16:19 UTC (permalink / raw) To: gcc-bugs ------- Additional Comments From sgk at troutmask dot apl dot washington dot edu 2004-08-20 16:19 ------- Can you explain in more detail what you believe is missing? program tinyhuge real(4) x real(8) y print*, 'tiny(x) = ', tiny(x) print*, 'huge(x) = ', huge(x) print*, 'tiny(y) = ', tiny(y) print*, 'huge(y) = ', huge(y) end program tinyhuge dhcp-78-96:sgk[212] cat tiny.f90 program tinyhuge real(4) x real(8) y print*, 'tiny(x) = ', tiny(x) print*, 'huge(x) = ', huge(x) print*, 'tiny(y) = ', tiny(y) print*, 'huge(y) = ', huge(y) end program tinyhuge dhcp-78-96:sgk[213] gfortran -static -o tiny tiny.f90 dhcp-78-96:sgk[215] ./tiny tiny(x) = 1.1754943E-38 huge(x) = 3.4028234E+38 tiny(y) = 2.225073858507201E-308 ^C Note, huge(y) isn't printed because I believe we have an issue with the printing routines on my FreeBSD AMD64 system (i.e., a 64-bit versus 32-bit problem). -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17117 ^ permalink raw reply [flat|nested] 5+ messages in thread
* [Bug fortran/17117] Unimplemented intrinsic HUGE / Unimplemented intrinsic TINY 2004-08-20 7:27 [Bug fortran/17117] New: Unimplemented intrinsic HUGE / Unimplemented intrinsic TINY c dot lemmen at fz-juelich dot de ` (2 preceding siblings ...) 2004-08-20 16:19 ` sgk at troutmask dot apl dot washington dot edu @ 2004-08-20 16:22 ` pinskia at gcc dot gnu dot org 3 siblings, 0 replies; 5+ messages in thread From: pinskia at gcc dot gnu dot org @ 2004-08-20 16:22 UTC (permalink / raw) To: gcc-bugs ------- Additional Comments From pinskia at gcc dot gnu dot org 2004-08-20 16:22 ------- Actually there are implemented so closing as fixed. -- What |Removed |Added ---------------------------------------------------------------------------- Status|NEW |RESOLVED Resolution| |FIXED Target Milestone|--- |3.5.0 http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17117 ^ permalink raw reply [flat|nested] 5+ messages in thread
end of thread, other threads:[~2004-08-20 16:22 UTC | newest] Thread overview: 5+ messages (download: mbox.gz / follow: Atom feed) -- links below jump to the message on this page -- 2004-08-20 7:27 [Bug fortran/17117] New: Unimplemented intrinsic HUGE / Unimplemented intrinsic TINY c dot lemmen at fz-juelich dot de 2004-08-20 9:11 ` [Bug fortran/17117] " pinskia at gcc dot gnu dot org 2004-08-20 9:14 ` pinskia at gcc dot gnu dot org 2004-08-20 16:19 ` sgk at troutmask dot apl dot washington dot edu 2004-08-20 16:22 ` pinskia at gcc dot gnu dot org
This is a public inbox, see mirroring instructions for how to clone and mirror all data and code used for this inbox; as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).