From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gcc-bugs-return-188887-listarch-gcc-bugs=gcc.gnu.org@gcc.gnu.org>
Received: (qmail 14550 invoked by alias); 12 Jun 2006 12:51:48 -0000
Received: (qmail 13437 invoked by uid 48); 12 Jun 2006 12:50:47 -0000
Date: Mon, 12 Jun 2006 13:03:00 -0000
Subject: [Bug fortran/27997]  New: Fortran 2003: Support type-spec for array constructor, i.e. (/ real :: 1., 2., 3. /)
X-Bugzilla-Reason: CC
Message-ID: <bug-27997-1719@http.gcc.gnu.org/bugzilla/>
Reply-To: gcc-bugzilla@gcc.gnu.org
To: gcc-bugs@gcc.gnu.org
From: "tobias dot burnus at physik dot fu-berlin dot de" <gcc-bugzilla@gcc.gnu.org>
Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm
Precedence: bulk
List-Archive: <http://gcc.gnu.org/ml/gcc-bugs/>
List-Post: <mailto:gcc-bugs@gcc.gnu.org>
List-Help: <mailto:gcc-bugs-help@gcc.gnu.org>
Sender: gcc-bugs-owner@gcc.gnu.org
X-SW-Source: 2006-06/txt/msg01172.txt.bz2
List-Id: <gcc-bugs.sourceware.org>

See Fortran 2003 standard, section 4.8.
Example (F2003, "Note 4.70"):
  (/ CHARACTER(LEN=7) :: ’Takata’, ’Tanaka’, ’Hayashi’ /)

Currently, this gives the error:
  a =  (/ character(len=7) :: 'Takata', 'Tanaka', 'Hayashi' /)
                         1
Error: Syntax error in array constructor at (1)

---------------------
program test
  character(15) :: a(3)
  a =  (/ character(len=7) :: 'Takata', 'Tanaka', 'Hayashi' /)
  print '(a)',a
end program test
---------------------


-- 
           Summary: Fortran 2003: Support type-spec for array constructor,
                    i.e. (/ real :: 1., 2., 3. /)
           Product: gcc
           Version: unknown
            Status: UNCONFIRMED
          Severity: enhancement
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: tobias dot burnus at physik dot fu-berlin dot de


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