[Bug fortran/34392] BOZ diagnost invalid Fortran 2003 use with -std=f2003 warnings

[Bug fortran/34392] BOZ diagnost invalid Fortran 2003 use with -std=f2003 warnings

[dominiq at lps dot ens.fr]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=34392

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

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Blocks|                            |20585

--- Comment #2 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
> FLOAT takes the same code path as REAL (w/o kind argument). With -std=f2003
> a BOZ in FLOAD should be rejected.

For 4.6 up to trunk (6.0) with -std=f2003 I get

 print *, float(Z'3FFF0080')
               1
Error: GNU Extension: non-default INTEGER kind argument to float intrinsic at
(1)

> For SNGL: It will probably solved by PR 34505, which should allow only
> real arguments for SNGL.

and

 print *, sngl(Z'3FFF000000000080')
              1
Error: 'a' argument of 'sngl' intrinsic at (1) must be REAL

4.3.1 up to 4.5 gives

print *, sngl(Z'3FFF000000000080')
             1
Error: Type of argument 'a' in call to 'sngl' at (1) should be REAL(8), not
INTEGER(16)

What is missing?


Referenced Bugs:

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=20585
[Bug 20585] [meta-bug] Fortran 2003 support

[Bug fortran/34392] BOZ diagnost invalid Fortran 2003 use with -std=f2003 warnings

[fxcoudert at gcc dot gnu dot org]

-- 

fxcoudert at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|0                           |1
           Keywords|                            |accepts-invalid
   Last reconfirmed|0000-00-00 00:00:00         |2009-03-29 09:18:38
               date|                            |


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

[Bug fortran/34392] BOZ diagnost invalid Fortran 2003 use with -std=f2003 warnings

[burnus at gcc dot gnu dot org]

------- Comment #1 from burnus at gcc dot gnu dot org  2007-12-17 09:49 -------
NOTE: The Fortran 2003 has the specific function (of generic REAL) FLOAT and
SNGL for which BOZ are not allowed.

FLOAT takes the same code path as REAL (w/o kind argument). With -std=f2003 a
BOZ in FLOAD should be rejected.

For SNGL: It will probably solved by PR 34505, which should allow only real
arguments for SNGL.

Currently, the gfortran documentation has:

"Since Fortran 2003 BOZ literals are also allowed as argument of REAL, DBLE,
INT and CMPLX; the result is the same as if the integer BOZ literal had been
converted by TRANSFER [...] The GNU Fortran intrinsic procedure FLOAT, DFLOAT,
COMPLEX and DCMPLX are treated alike."
http://gcc.gnu.org/onlinedocs/gfortran/BOZ-literal-constants.html


-- 


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