public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug fortran/15957] New: Error in array assignments; 'shape'-related stuff
@ 2004-06-12 12:54 Mart dot Rentmeester at sci dot kun dot nl
  2004-06-12 13:20 ` [Bug fortran/15957] " pinskia at gcc dot gnu dot org
  0 siblings, 1 reply; 6+ messages in thread
From: Mart dot Rentmeester at sci dot kun dot nl @ 2004-06-12 12:54 UTC (permalink / raw)
  To: gcc-bugs

The following piece of code doesn't compile: an error is 
detected. Yet all other compilers I use accept it.
I assume it is a gfortran bug



troogle> gfortran -v -c n5.f95 
Reading specs from /OPT/32/gcc-2004-06-09/lib/gcc/hppa2.0w-hp-hpux11.11/3.5.
0/specs
Configured with: ../configure --enable-languages=c,f95 
--prefix=/opt32/gcc-2004-06-09 --with-gmp=/opt32/gmp --with-gnu-as 
--with-as=/opt32/binutils/bin/as --enable-threads --disable-shared --disable-nls
Thread model: posix
gcc version 3.5.0 20040611 (experimental)
 /OPT/32/gcc-2004-06-09/libexec/gcc/hppa2.0w-hp-hpux11.11/3.5.0/f951 n5.f95 
-quiet -dumpbase n5.f95 -auxbase n5 -version -o /var/tmp//cc1BoJQW.s
GNU F95 version 3.5.0 20040611 (experimental) (hppa2.0w-hp-hpux11.11)
        compiled by GNU C version 3.5.0 20040611 (experimental).
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096


 In file n5.f95:6

      real, parameter      :: a2(2,0:2) = reshape ( (/  5.0, 8.0, -1.0,       &
                                      1
Error: Array assignment at (1) has different shape on dimension 1 (2/3)
 In file n5.f95:12

      a = a2
           1
Error: Symbol 'a2' at (1) has no IMPLICIT type





      subroutine num2in(m,a)

      implicit none
      integer, intent(in)  :: m
      real, intent(out)    :: a(m,0:m)
      real, parameter      :: a2(2,0:2) = reshape ( (/  5.0, 8.0, -1.0,       &
                                                       -1.0, 8.0,  5.0  /),   &
                                                     shape = (/2,3/),         &
                                                     order = (/2,1/)          &
                                                  ) / 12.0

      a = a2

      end subroutine num2in

-- 
           Summary: Error in array assignments; 'shape'-related stuff
           Product: gcc
           Version: 3.5.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: Mart dot Rentmeester at sci dot kun dot nl
                CC: gcc-bugs at gcc dot gnu dot org


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


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

* [Bug fortran/15957] Error in array assignments; 'shape'-related stuff
  2004-06-12 12:54 [Bug fortran/15957] New: Error in array assignments; 'shape'-related stuff Mart dot Rentmeester at sci dot kun dot nl
@ 2004-06-12 13:20 ` pinskia at gcc dot gnu dot org
  0 siblings, 0 replies; 6+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2004-06-12 13:20 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From pinskia at gcc dot gnu dot org  2004-06-12 13:19 -------
Confirmed.

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|                            |1
           Keywords|                            |rejects-valid
   Last reconfirmed|0000-00-00 00:00:00         |2004-06-12 13:19:59
               date|                            |


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


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

* [Bug fortran/15957] Error in array assignments; 'shape'-related stuff
       [not found] <20040612125428.15957.Mart.Rentmeester@nn-online.org>
                   ` (2 preceding siblings ...)
  2004-09-20 17:23 ` tobi at gcc dot gnu dot org
@ 2004-09-20 17:30 ` pinskia at gcc dot gnu dot org
  3 siblings, 0 replies; 6+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2004-09-20 17:30 UTC (permalink / raw)
  To: gcc-bugs



-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
   Target Milestone|---                         |4.0.0


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


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

* [Bug fortran/15957] Error in array assignments; 'shape'-related stuff
       [not found] <20040612125428.15957.Mart.Rentmeester@nn-online.org>
  2004-09-20 17:05 ` tobi at gcc dot gnu dot org
  2004-09-20 17:22 ` cvs-commit at gcc dot gnu dot org
@ 2004-09-20 17:23 ` tobi at gcc dot gnu dot org
  2004-09-20 17:30 ` pinskia at gcc dot gnu dot org
  3 siblings, 0 replies; 6+ messages in thread
From: tobi at gcc dot gnu dot org @ 2004-09-20 17:23 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From tobi at gcc dot gnu dot org  2004-09-20 17:23 -------
Fixed.

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |RESOLVED
         Resolution|                            |FIXED


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


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

* [Bug fortran/15957] Error in array assignments; 'shape'-related stuff
       [not found] <20040612125428.15957.Mart.Rentmeester@nn-online.org>
  2004-09-20 17:05 ` tobi at gcc dot gnu dot org
@ 2004-09-20 17:22 ` cvs-commit at gcc dot gnu dot org
  2004-09-20 17:23 ` tobi at gcc dot gnu dot org
  2004-09-20 17:30 ` pinskia at gcc dot gnu dot org
  3 siblings, 0 replies; 6+ messages in thread
From: cvs-commit at gcc dot gnu dot org @ 2004-09-20 17:22 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From cvs-commit at gcc dot gnu dot org  2004-09-20 17:22 -------
Subject: Bug 15957

CVSROOT:	/cvs/gcc
Module name:	gcc
Changes by:	tobi@gcc.gnu.org	2004-09-20 17:22:50

Modified files:
	gcc/testsuite  : ChangeLog 
	gcc/fortran    : ChangeLog simplify.c 
Added files:
	gcc/testsuite/gfortran.dg: pr15957.f90 

Log message:
	fortran/
	PR fortran/15957
	* simplify.c (gfc_simplify_reshape): Set shape of return value
	correctly.
	
	testsuite/
	PR fortran/15957
	* gfortran.dg/pr15957.f90: New test.

Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/ChangeLog.diff?cvsroot=gcc&r1=1.4320&r2=1.4321
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/pr15957.f90.diff?cvsroot=gcc&r1=NONE&r2=1.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/ChangeLog.diff?cvsroot=gcc&r1=1.210&r2=1.211
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/simplify.c.diff?cvsroot=gcc&r1=1.10&r2=1.11



-- 


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


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

* [Bug fortran/15957] Error in array assignments; 'shape'-related stuff
       [not found] <20040612125428.15957.Mart.Rentmeester@nn-online.org>
@ 2004-09-20 17:05 ` tobi at gcc dot gnu dot org
  2004-09-20 17:22 ` cvs-commit at gcc dot gnu dot org
                   ` (2 subsequent siblings)
  3 siblings, 0 replies; 6+ messages in thread
From: tobi at gcc dot gnu dot org @ 2004-09-20 17:05 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From tobi at gcc dot gnu dot org  2004-09-20 17:05 -------
Patch here: http://gcc.gnu.org/ml/fortran/2004-09/msg00181.html
Already ok'ed, will commit in a minute.

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |patch


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


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

end of thread, other threads:[~2004-09-20 17:30 UTC | newest]

Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2004-06-12 12:54 [Bug fortran/15957] New: Error in array assignments; 'shape'-related stuff Mart dot Rentmeester at sci dot kun dot nl
2004-06-12 13:20 ` [Bug fortran/15957] " pinskia at gcc dot gnu dot org
     [not found] <20040612125428.15957.Mart.Rentmeester@nn-online.org>
2004-09-20 17:05 ` tobi at gcc dot gnu dot org
2004-09-20 17:22 ` cvs-commit at gcc dot gnu dot org
2004-09-20 17:23 ` tobi at gcc dot gnu dot org
2004-09-20 17:30 ` 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).