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).