public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug fortran/33513]  New: error reported on correct initialization code.
@ 2007-09-21  2:57 clerman at fuse dot net
  2007-09-21  3:46 ` [Bug fortran/33513] " kargl at gcc dot gnu dot org
                   ` (4 more replies)
  0 siblings, 5 replies; 6+ messages in thread
From: clerman at fuse dot net @ 2007-09-21  2:57 UTC (permalink / raw)
  To: gcc-bugs

I get the following error message:

mtftypesM.f90:615.71:

  real (DOUB_PREC), parameter :: DEFAULT_MTF_FIELDS(2, MTF_FIELD_PTS) = &
                                                                      1
Error: Extension: Evaluation of nonstandard initialization expression at (1)
mtftypesM.f90:441.52:

on the following line of code:

  real (DOUB_PREC), parameter :: DEFAULT_MTF_FIELDS(2, MTF_FIELD_PTS) = &
    & reshape ((/0.0_DOUB_PREC, 0.0_DOUB_PREC, 0.0_DOUB_PREC, 0.35_DOUB_PREC,
0.0_DOUB_PREC, 0.7_DOUB_PREC,&
    & 0.0_DOUB_PREC, 0.85_DOUB_PREC, 0.0_DOUB_PREC, 1.0_DOUB_PREC/), shape =
(/2_TinyInteger, MTF_FIELD_PTS/))

where

  integer, parameter :: DefaultInteger = kind (1)
  integer(DefaultInteger), parameter :: TinyInteger = selected_int_kind (2)
  integer(DefaultInteger), parameter :: DOUB_PREC = selected_real_kind (15,
307)
  integer (TinyInteger), parameter ::  MTF_FIELD_PTS = 5_TinyInteger

  I believe this may be the same as bug 29962. Note that the following
compilers all correctly compile this code: Lahey LF64, NAG version 5.1, Intel
version 10, g95.

Norm Clerman


-- 
           Summary: error reported on correct initialization code.
           Product: gcc
           Version: 4.2.2
            Status: UNCONFIRMED
          Severity: major
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: clerman at fuse dot net


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


^ permalink raw reply	[flat|nested] 6+ messages in thread

end of thread, other threads:[~2007-09-23  9:09 UTC | newest]

Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2007-09-21  2:57 [Bug fortran/33513] New: error reported on correct initialization code clerman at fuse dot net
2007-09-21  3:46 ` [Bug fortran/33513] " kargl at gcc dot gnu dot org
2007-09-21  7:58 ` burnus at gcc dot gnu dot org
2007-09-22 16:37 ` clerman at fuse dot net
2007-09-22 16:37 ` clerman at fuse dot net
2007-09-23  9:09 ` fxcoudert 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).