real, parameter :: M2_PI = '40490FDB'X
end

uses several extensions, which are not diagnosed:
- X instead of Z
- Suffix instead of prefix
- BOZ to initialize a REAL
  (the later is allowed in F2003 using REAL(Z'...').)

BOZ bugs: PR 18026 and PR 29471.

Fortran 95:

   In a DATA statement (5.2.10), an unsigned binary, octal, or hexadecimal 
   literal constant shall correspond to an integer scalar variable.
   R407 boz-literal-constant is binary-constant
                             or octal-constant
                             or hex-constant
   Constraint: A boz-literal-constant may appear only in a DATA statement.

Fortran 2003:

   "A boz-literal-constant shall appear only as a data-stmt-constant
   in a DATA statement, as the actual argument associated with the
   dummy argument A of the numeric intrinsic functions DBLE, REAL or
   INT, or as the actual argument associated with the X or Y dummy
   argument of the intrinsic function CMPLX."

Came up in
http://groups.google.com/group/comp.lang.fortran/browse_thread/thread/2ad94287d7f8a6f0/


-- 
           Summary: BOZ extensions not diagnosed as such with -std=f95
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Keywords: diagnostic
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: burnus at gcc dot gnu dot org


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

Reply via email to