* [Bug fortran/35993] wrong answer for PRODUCT with scalar mask
2008-04-20 20:13 [Bug fortran/35993] New: wrong answer for PRODUCT with scalar mask dick dot hendrickson at gmail dot com
@ 2008-04-20 21:03 ` tkoenig at gcc dot gnu dot org
2008-04-22 18:47 ` [Bug fortran/35993] [4.3/4.4 regression] " tkoenig at gcc dot gnu dot org
` (14 subsequent siblings)
15 siblings, 0 replies; 17+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2008-04-20 21:03 UTC (permalink / raw)
To: gcc-bugs
------- Comment #1 from tkoenig at gcc dot gnu dot org 2008-04-20 21:02 -------
Confirmed.
--
tkoenig at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Ever Confirmed|0 |1
Keywords| |wrong-code
Last reconfirmed|0000-00-00 00:00:00 |2008-04-20 21:02:20
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35993
^ permalink raw reply [flat|nested] 17+ messages in thread
* [Bug fortran/35993] [4.3/4.4 regression] wrong answer for PRODUCT with scalar mask
2008-04-20 20:13 [Bug fortran/35993] New: wrong answer for PRODUCT with scalar mask dick dot hendrickson at gmail dot com
2008-04-20 21:03 ` [Bug fortran/35993] " tkoenig at gcc dot gnu dot org
@ 2008-04-22 18:47 ` tkoenig at gcc dot gnu dot org
2008-04-22 19:35 ` jakub at gcc dot gnu dot org
` (13 subsequent siblings)
15 siblings, 0 replies; 17+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2008-04-22 18:47 UTC (permalink / raw)
To: gcc-bugs
------- Comment #2 from tkoenig at gcc dot gnu dot org 2008-04-22 18:46 -------
A regression (well, sort of; 4.2 failed with the bogus
error message, but at least it didn't generate wrong code):
$ gfortran-4.2 foo.f90
$ ./a.out
Fortran runtime error: rank of return array does not equal 1
--
tkoenig at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Summary|wrong answer for PRODUCT |[4.3/4.4 regression] wrong
|with scalar mask |answer for PRODUCT with
| |scalar mask
Target Milestone|--- |4.3.1
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35993
^ permalink raw reply [flat|nested] 17+ messages in thread
* [Bug fortran/35993] [4.3/4.4 regression] wrong answer for PRODUCT with scalar mask
2008-04-20 20:13 [Bug fortran/35993] New: wrong answer for PRODUCT with scalar mask dick dot hendrickson at gmail dot com
2008-04-20 21:03 ` [Bug fortran/35993] " tkoenig at gcc dot gnu dot org
2008-04-22 18:47 ` [Bug fortran/35993] [4.3/4.4 regression] " tkoenig at gcc dot gnu dot org
@ 2008-04-22 19:35 ` jakub at gcc dot gnu dot org
2008-04-25 4:37 ` jvdelisle at gcc dot gnu dot org
` (12 subsequent siblings)
15 siblings, 0 replies; 17+ messages in thread
From: jakub at gcc dot gnu dot org @ 2008-04-22 19:35 UTC (permalink / raw)
To: gcc-bugs
--
jakub at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Priority|P3 |P4
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35993
^ permalink raw reply [flat|nested] 17+ messages in thread
* [Bug fortran/35993] [4.3/4.4 regression] wrong answer for PRODUCT with scalar mask
2008-04-20 20:13 [Bug fortran/35993] New: wrong answer for PRODUCT with scalar mask dick dot hendrickson at gmail dot com
` (2 preceding siblings ...)
2008-04-22 19:35 ` jakub at gcc dot gnu dot org
@ 2008-04-25 4:37 ` jvdelisle at gcc dot gnu dot org
2008-04-26 4:28 ` jvdelisle at gcc dot gnu dot org
` (11 subsequent siblings)
15 siblings, 0 replies; 17+ messages in thread
From: jvdelisle at gcc dot gnu dot org @ 2008-04-25 4:37 UTC (permalink / raw)
To: gcc-bugs
------- Comment #3 from jvdelisle at gcc dot gnu dot org 2008-04-25 04:36 -------
I am working on this.
--
jvdelisle at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
AssignedTo|unassigned at gcc dot gnu |jvdelisle at gcc dot gnu dot
|dot org |org
Status|NEW |ASSIGNED
Last reconfirmed|2008-04-20 21:02:20 |2008-04-25 04:36:29
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35993
^ permalink raw reply [flat|nested] 17+ messages in thread
* [Bug fortran/35993] [4.3/4.4 regression] wrong answer for PRODUCT with scalar mask
2008-04-20 20:13 [Bug fortran/35993] New: wrong answer for PRODUCT with scalar mask dick dot hendrickson at gmail dot com
` (3 preceding siblings ...)
2008-04-25 4:37 ` jvdelisle at gcc dot gnu dot org
@ 2008-04-26 4:28 ` jvdelisle at gcc dot gnu dot org
2008-04-26 6:15 ` [Bug fortran/35993] [4.3/4.4 regression] wrong answer for all array intrinsics " jvdelisle at gcc dot gnu dot org
` (10 subsequent siblings)
15 siblings, 0 replies; 17+ messages in thread
From: jvdelisle at gcc dot gnu dot org @ 2008-04-26 4:28 UTC (permalink / raw)
To: gcc-bugs
------- Comment #4 from jvdelisle at gcc dot gnu dot org 2008-04-26 04:27 -------
This problem is worse then thought. It also extends to the SUM intrinsic which
uses a similar code pattern. When MASK is a scalar and false the code that
should traverse the destination array and set the values to 1 for PRODUCT and 0
for SUM just flat does not do that. It does not traverse each element of the
return array (dest)
for (n = 0; n < rank; n++)
dest[n * dstride] = 1 ;
Also the rank is set to the source array rank rather than the return array
array rank, which is also wrong.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35993
^ permalink raw reply [flat|nested] 17+ messages in thread
* [Bug fortran/35993] [4.3/4.4 regression] wrong answer for all array intrinsics with scalar mask
2008-04-20 20:13 [Bug fortran/35993] New: wrong answer for PRODUCT with scalar mask dick dot hendrickson at gmail dot com
` (4 preceding siblings ...)
2008-04-26 4:28 ` jvdelisle at gcc dot gnu dot org
@ 2008-04-26 6:15 ` jvdelisle at gcc dot gnu dot org
2008-04-26 6:18 ` jvdelisle at gcc dot gnu dot org
` (9 subsequent siblings)
15 siblings, 0 replies; 17+ messages in thread
From: jvdelisle at gcc dot gnu dot org @ 2008-04-26 6:15 UTC (permalink / raw)
To: gcc-bugs
------- Comment #5 from jvdelisle at gcc dot gnu dot org 2008-04-26 06:14 -------
I am also seeing this same issue with all the array intrinsics that accept a
mask if it is scalar and .false. At this point I am calling for some second
opinions here. The bad code is in the "s" version of each of the generated
array intrinsics. Am I missing something or is this really a hole?
--
jvdelisle at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Summary|[4.3/4.4 regression] wrong |[4.3/4.4 regression] wrong
|answer for PRODUCT with |answer for all array
|scalar mask |intrinsics with scalar mask
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35993
^ permalink raw reply [flat|nested] 17+ messages in thread
* [Bug fortran/35993] [4.3/4.4 regression] wrong answer for all array intrinsics with scalar mask
2008-04-20 20:13 [Bug fortran/35993] New: wrong answer for PRODUCT with scalar mask dick dot hendrickson at gmail dot com
` (5 preceding siblings ...)
2008-04-26 6:15 ` [Bug fortran/35993] [4.3/4.4 regression] wrong answer for all array intrinsics " jvdelisle at gcc dot gnu dot org
@ 2008-04-26 6:18 ` jvdelisle at gcc dot gnu dot org
2008-04-26 8:51 ` tkoenig at gcc dot gnu dot org
` (8 subsequent siblings)
15 siblings, 0 replies; 17+ messages in thread
From: jvdelisle at gcc dot gnu dot org @ 2008-04-26 6:18 UTC (permalink / raw)
To: gcc-bugs
------- Comment #6 from jvdelisle at gcc dot gnu dot org 2008-04-26 06:17 -------
I am going to un assign myself. I think we need a team effort here.
--
jvdelisle at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
AssignedTo|jvdelisle at gcc dot gnu dot|unassigned at gcc dot gnu
|org |dot org
Severity|normal |major
Status|ASSIGNED |NEW
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35993
^ permalink raw reply [flat|nested] 17+ messages in thread
* [Bug fortran/35993] [4.3/4.4 regression] wrong answer for all array intrinsics with scalar mask
2008-04-20 20:13 [Bug fortran/35993] New: wrong answer for PRODUCT with scalar mask dick dot hendrickson at gmail dot com
` (6 preceding siblings ...)
2008-04-26 6:18 ` jvdelisle at gcc dot gnu dot org
@ 2008-04-26 8:51 ` tkoenig at gcc dot gnu dot org
2008-04-26 12:53 ` jvdelisle at gcc dot gnu dot org
` (7 subsequent siblings)
15 siblings, 0 replies; 17+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2008-04-26 8:51 UTC (permalink / raw)
To: gcc-bugs
------- Comment #7 from tkoenig at gcc dot gnu dot org 2008-04-26 08:50 -------
I'll look at this (and handle the m4 parts, which I am getting
to be good at), but not today.
The good part is that we'll only need to fix this in a single
place, the definition of SCALAR_ARRAY_FUNCTION in
ifunction.m4 . I wrote this, so I might as well fix this
(but probably not within the next couple of days).
If somebody else has insight, patches etc. please don't hesitate
to put this into the PR.
Setting severity.
--
tkoenig at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
AssignedTo|unassigned at gcc dot gnu |tkoenig at gcc dot gnu dot
|dot org |org
Severity|major |critical
Status|NEW |ASSIGNED
Last reconfirmed|2008-04-25 04:36:29 |2008-04-26 08:50:20
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35993
^ permalink raw reply [flat|nested] 17+ messages in thread
* [Bug fortran/35993] [4.3/4.4 regression] wrong answer for all array intrinsics with scalar mask
2008-04-20 20:13 [Bug fortran/35993] New: wrong answer for PRODUCT with scalar mask dick dot hendrickson at gmail dot com
` (7 preceding siblings ...)
2008-04-26 8:51 ` tkoenig at gcc dot gnu dot org
@ 2008-04-26 12:53 ` jvdelisle at gcc dot gnu dot org
2008-04-28 21:04 ` pault at gcc dot gnu dot org
` (6 subsequent siblings)
15 siblings, 0 replies; 17+ messages in thread
From: jvdelisle at gcc dot gnu dot org @ 2008-04-26 12:53 UTC (permalink / raw)
To: gcc-bugs
------- Comment #8 from jvdelisle at gcc dot gnu dot org 2008-04-26 12:52 -------
Looking at product.m4 as an example:
--- snip ---
MASKED_ARRAY_FUNCTION(1,
` result = 1;',
` if (*msrc)
result *= *src;')
SCALAR_ARRAY_FUNCTION(1)
`#endif'
The SCALAR_ARRAY_FUNCTION is empty. It needs set the result.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35993
^ permalink raw reply [flat|nested] 17+ messages in thread
* [Bug fortran/35993] [4.3/4.4 regression] wrong answer for all array intrinsics with scalar mask
2008-04-20 20:13 [Bug fortran/35993] New: wrong answer for PRODUCT with scalar mask dick dot hendrickson at gmail dot com
` (8 preceding siblings ...)
2008-04-26 12:53 ` jvdelisle at gcc dot gnu dot org
@ 2008-04-28 21:04 ` pault at gcc dot gnu dot org
2008-04-28 21:35 ` tkoenig at gcc dot gnu dot org
` (5 subsequent siblings)
15 siblings, 0 replies; 17+ messages in thread
From: pault at gcc dot gnu dot org @ 2008-04-28 21:04 UTC (permalink / raw)
To: gcc-bugs
------- Comment #9 from pault at gcc dot gnu dot org 2008-04-28 21:03 -------
This is not "critical" in the gcc sense - I would change it back to normal if I
were you. After all, this feature of F95 has never worked correctly:)
Cheers
Paul
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35993
^ permalink raw reply [flat|nested] 17+ messages in thread
* [Bug fortran/35993] [4.3/4.4 regression] wrong answer for all array intrinsics with scalar mask
2008-04-20 20:13 [Bug fortran/35993] New: wrong answer for PRODUCT with scalar mask dick dot hendrickson at gmail dot com
` (9 preceding siblings ...)
2008-04-28 21:04 ` pault at gcc dot gnu dot org
@ 2008-04-28 21:35 ` tkoenig at gcc dot gnu dot org
2008-04-29 3:15 ` jvdelisle at gcc dot gnu dot org
` (4 subsequent siblings)
15 siblings, 0 replies; 17+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2008-04-28 21:35 UTC (permalink / raw)
To: gcc-bugs
------- Comment #10 from tkoenig at gcc dot gnu dot org 2008-04-28 21:34 -------
Created an attachment (id=15542)
--> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=15542&action=view)
proposed patch
This fixes the test case.
Regression-test and submission probably tomorrow.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35993
^ permalink raw reply [flat|nested] 17+ messages in thread
* [Bug fortran/35993] [4.3/4.4 regression] wrong answer for all array intrinsics with scalar mask
2008-04-20 20:13 [Bug fortran/35993] New: wrong answer for PRODUCT with scalar mask dick dot hendrickson at gmail dot com
` (10 preceding siblings ...)
2008-04-28 21:35 ` tkoenig at gcc dot gnu dot org
@ 2008-04-29 3:15 ` jvdelisle at gcc dot gnu dot org
2008-04-30 16:57 ` tkoenig at gcc dot gnu dot org
` (3 subsequent siblings)
15 siblings, 0 replies; 17+ messages in thread
From: jvdelisle at gcc dot gnu dot org @ 2008-04-29 3:15 UTC (permalink / raw)
To: gcc-bugs
------- Comment #11 from jvdelisle at gcc dot gnu dot org 2008-04-29 03:14 -------
The patch fixes sum, product, and minloc. Regression tests OK on x86-64.
Thanks for patch.
--
jvdelisle at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Severity|critical |normal
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35993
^ permalink raw reply [flat|nested] 17+ messages in thread
* [Bug fortran/35993] [4.3/4.4 regression] wrong answer for all array intrinsics with scalar mask
2008-04-20 20:13 [Bug fortran/35993] New: wrong answer for PRODUCT with scalar mask dick dot hendrickson at gmail dot com
` (11 preceding siblings ...)
2008-04-29 3:15 ` jvdelisle at gcc dot gnu dot org
@ 2008-04-30 16:57 ` tkoenig at gcc dot gnu dot org
2008-04-30 18:06 ` [Bug fortran/35993] [4.3 " tkoenig at gcc dot gnu dot org
` (2 subsequent siblings)
15 siblings, 0 replies; 17+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2008-04-30 16:57 UTC (permalink / raw)
To: gcc-bugs
------- Comment #12 from tkoenig at gcc dot gnu dot org 2008-04-30 16:56 -------
Subject: Bug 35993
Author: tkoenig
Date: Wed Apr 30 16:56:01 2008
New Revision: 134830
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=134830
Log:
2008-04-30 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/35993
* ifunction.m4 (SCALAR_ARRAY_FUNCTION): Use correct
implementation for multi-dimensional return arrays when
the mask is .false.
* generated/maxloc1_16_i1.c: Regenerated.
* generated/maxloc1_16_i16.c: Regenerated.
* generated/maxloc1_16_i2.c: Regenerated.
* generated/maxloc1_16_i4.c: Regenerated.
* generated/maxloc1_16_i8.c: Regenerated.
* generated/maxloc1_16_r10.c: Regenerated.
* generated/maxloc1_16_r16.c: Regenerated.
* generated/maxloc1_16_r4.c: Regenerated.
* generated/maxloc1_16_r8.c: Regenerated.
* generated/maxloc1_4_i1.c: Regenerated.
* generated/maxloc1_4_i16.c: Regenerated.
* generated/maxloc1_4_i2.c: Regenerated.
* generated/maxloc1_4_i4.c: Regenerated.
* generated/maxloc1_4_i8.c: Regenerated.
* generated/maxloc1_4_r10.c: Regenerated.
* generated/maxloc1_4_r16.c: Regenerated.
* generated/maxloc1_4_r4.c: Regenerated.
* generated/maxloc1_4_r8.c: Regenerated.
* generated/maxloc1_8_i1.c: Regenerated.
* generated/maxloc1_8_i16.c: Regenerated.
* generated/maxloc1_8_i2.c: Regenerated.
* generated/maxloc1_8_i4.c: Regenerated.
* generated/maxloc1_8_i8.c: Regenerated.
* generated/maxloc1_8_r10.c: Regenerated.
* generated/maxloc1_8_r16.c: Regenerated.
* generated/maxloc1_8_r4.c: Regenerated.
* generated/maxloc1_8_r8.c: Regenerated.
* generated/maxval_i1.c: Regenerated.
* generated/maxval_i16.c: Regenerated.
* generated/maxval_i2.c: Regenerated.
* generated/maxval_i4.c: Regenerated.
* generated/maxval_i8.c: Regenerated.
* generated/maxval_r10.c: Regenerated.
* generated/maxval_r16.c: Regenerated.
* generated/maxval_r4.c: Regenerated.
* generated/maxval_r8.c: Regenerated.
* generated/minloc1_16_i1.c: Regenerated.
* generated/minloc1_16_i16.c: Regenerated.
* generated/minloc1_16_i2.c: Regenerated.
* generated/minloc1_16_i4.c: Regenerated.
* generated/minloc1_16_i8.c: Regenerated.
* generated/minloc1_16_r10.c: Regenerated.
* generated/minloc1_16_r16.c: Regenerated.
* generated/minloc1_16_r4.c: Regenerated.
* generated/minloc1_16_r8.c: Regenerated.
* generated/minloc1_4_i1.c: Regenerated.
* generated/minloc1_4_i16.c: Regenerated.
* generated/minloc1_4_i2.c: Regenerated.
* generated/minloc1_4_i4.c: Regenerated.
* generated/minloc1_4_i8.c: Regenerated.
* generated/minloc1_4_r10.c: Regenerated.
* generated/minloc1_4_r16.c: Regenerated.
* generated/minloc1_4_r4.c: Regenerated.
* generated/minloc1_4_r8.c: Regenerated.
* generated/minloc1_8_i1.c: Regenerated.
* generated/minloc1_8_i16.c: Regenerated.
* generated/minloc1_8_i2.c: Regenerated.
* generated/minloc1_8_i4.c: Regenerated.
* generated/minloc1_8_i8.c: Regenerated.
* generated/minloc1_8_r10.c: Regenerated.
* generated/minloc1_8_r16.c: Regenerated.
* generated/minloc1_8_r4.c: Regenerated.
* generated/minloc1_8_r8.c: Regenerated.
* generated/minval_i1.c: Regenerated.
* generated/minval_i16.c: Regenerated.
* generated/minval_i2.c: Regenerated.
* generated/minval_i4.c: Regenerated.
* generated/minval_i8.c: Regenerated.
* generated/minval_r10.c: Regenerated.
* generated/minval_r16.c: Regenerated.
* generated/minval_r4.c: Regenerated.
* generated/minval_r8.c: Regenerated.
* generated/product_c10.c: Regenerated.
* generated/product_c16.c: Regenerated.
* generated/product_c4.c: Regenerated.
* generated/product_c8.c: Regenerated.
* generated/product_i1.c: Regenerated.
* generated/product_i16.c: Regenerated.
* generated/product_i2.c: Regenerated.
* generated/product_i4.c: Regenerated.
* generated/product_i8.c: Regenerated.
* generated/product_r10.c: Regenerated.
* generated/product_r16.c: Regenerated.
* generated/product_r4.c: Regenerated.
* generated/product_r8.c: Regenerated.
* generated/sum_c10.c: Regenerated.
* generated/sum_c16.c: Regenerated.
* generated/sum_c4.c: Regenerated.
* generated/sum_c8.c: Regenerated.
* generated/sum_i1.c: Regenerated.
* generated/sum_i16.c: Regenerated.
* generated/sum_i2.c: Regenerated.
* generated/sum_i4.c: Regenerated.
* generated/sum_i8.c: Regenerated.
* generated/sum_r10.c: Regenerated.
* generated/sum_r16.c: Regenerated.
* generated/sum_r4.c: Regenerated.
* generated/sum_r8.c: Regenerated.
2008-04-30 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/35993
* gfortran.dg/intrinsic_product_1.f90: New test case.
Added:
trunk/gcc/testsuite/gfortran.dg/intrinsic_product_1.f90
Modified:
trunk/gcc/testsuite/ChangeLog
trunk/libgfortran/ChangeLog
trunk/libgfortran/generated/maxloc1_16_i1.c
trunk/libgfortran/generated/maxloc1_16_i16.c
trunk/libgfortran/generated/maxloc1_16_i2.c
trunk/libgfortran/generated/maxloc1_16_i4.c
trunk/libgfortran/generated/maxloc1_16_i8.c
trunk/libgfortran/generated/maxloc1_16_r10.c
trunk/libgfortran/generated/maxloc1_16_r16.c
trunk/libgfortran/generated/maxloc1_16_r4.c
trunk/libgfortran/generated/maxloc1_16_r8.c
trunk/libgfortran/generated/maxloc1_4_i1.c
trunk/libgfortran/generated/maxloc1_4_i16.c
trunk/libgfortran/generated/maxloc1_4_i2.c
trunk/libgfortran/generated/maxloc1_4_i4.c
trunk/libgfortran/generated/maxloc1_4_i8.c
trunk/libgfortran/generated/maxloc1_4_r10.c
trunk/libgfortran/generated/maxloc1_4_r16.c
trunk/libgfortran/generated/maxloc1_4_r4.c
trunk/libgfortran/generated/maxloc1_4_r8.c
trunk/libgfortran/generated/maxloc1_8_i1.c
trunk/libgfortran/generated/maxloc1_8_i16.c
trunk/libgfortran/generated/maxloc1_8_i2.c
trunk/libgfortran/generated/maxloc1_8_i4.c
trunk/libgfortran/generated/maxloc1_8_i8.c
trunk/libgfortran/generated/maxloc1_8_r10.c
trunk/libgfortran/generated/maxloc1_8_r16.c
trunk/libgfortran/generated/maxloc1_8_r4.c
trunk/libgfortran/generated/maxloc1_8_r8.c
trunk/libgfortran/generated/maxval_i1.c
trunk/libgfortran/generated/maxval_i16.c
trunk/libgfortran/generated/maxval_i2.c
trunk/libgfortran/generated/maxval_i4.c
trunk/libgfortran/generated/maxval_i8.c
trunk/libgfortran/generated/maxval_r10.c
trunk/libgfortran/generated/maxval_r16.c
trunk/libgfortran/generated/maxval_r4.c
trunk/libgfortran/generated/maxval_r8.c
trunk/libgfortran/generated/minloc1_16_i1.c
trunk/libgfortran/generated/minloc1_16_i16.c
trunk/libgfortran/generated/minloc1_16_i2.c
trunk/libgfortran/generated/minloc1_16_i4.c
trunk/libgfortran/generated/minloc1_16_i8.c
trunk/libgfortran/generated/minloc1_16_r10.c
trunk/libgfortran/generated/minloc1_16_r16.c
trunk/libgfortran/generated/minloc1_16_r4.c
trunk/libgfortran/generated/minloc1_16_r8.c
trunk/libgfortran/generated/minloc1_4_i1.c
trunk/libgfortran/generated/minloc1_4_i16.c
trunk/libgfortran/generated/minloc1_4_i2.c
trunk/libgfortran/generated/minloc1_4_i4.c
trunk/libgfortran/generated/minloc1_4_i8.c
trunk/libgfortran/generated/minloc1_4_r10.c
trunk/libgfortran/generated/minloc1_4_r16.c
trunk/libgfortran/generated/minloc1_4_r4.c
trunk/libgfortran/generated/minloc1_4_r8.c
trunk/libgfortran/generated/minloc1_8_i1.c
trunk/libgfortran/generated/minloc1_8_i16.c
trunk/libgfortran/generated/minloc1_8_i2.c
trunk/libgfortran/generated/minloc1_8_i4.c
trunk/libgfortran/generated/minloc1_8_i8.c
trunk/libgfortran/generated/minloc1_8_r10.c
trunk/libgfortran/generated/minloc1_8_r16.c
trunk/libgfortran/generated/minloc1_8_r4.c
trunk/libgfortran/generated/minloc1_8_r8.c
trunk/libgfortran/generated/minval_i1.c
trunk/libgfortran/generated/minval_i16.c
trunk/libgfortran/generated/minval_i2.c
trunk/libgfortran/generated/minval_i4.c
trunk/libgfortran/generated/minval_i8.c
trunk/libgfortran/generated/minval_r10.c
trunk/libgfortran/generated/minval_r16.c
trunk/libgfortran/generated/minval_r4.c
trunk/libgfortran/generated/minval_r8.c
trunk/libgfortran/generated/product_c10.c
trunk/libgfortran/generated/product_c16.c
trunk/libgfortran/generated/product_c4.c
trunk/libgfortran/generated/product_c8.c
trunk/libgfortran/generated/product_i1.c
trunk/libgfortran/generated/product_i16.c
trunk/libgfortran/generated/product_i2.c
trunk/libgfortran/generated/product_i4.c
trunk/libgfortran/generated/product_i8.c
trunk/libgfortran/generated/product_r10.c
trunk/libgfortran/generated/product_r16.c
trunk/libgfortran/generated/product_r4.c
trunk/libgfortran/generated/product_r8.c
trunk/libgfortran/generated/sum_c10.c
trunk/libgfortran/generated/sum_c16.c
trunk/libgfortran/generated/sum_c4.c
trunk/libgfortran/generated/sum_c8.c
trunk/libgfortran/generated/sum_i1.c
trunk/libgfortran/generated/sum_i16.c
trunk/libgfortran/generated/sum_i2.c
trunk/libgfortran/generated/sum_i4.c
trunk/libgfortran/generated/sum_i8.c
trunk/libgfortran/generated/sum_r10.c
trunk/libgfortran/generated/sum_r16.c
trunk/libgfortran/generated/sum_r4.c
trunk/libgfortran/generated/sum_r8.c
trunk/libgfortran/m4/ifunction.m4
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35993
^ permalink raw reply [flat|nested] 17+ messages in thread
* [Bug fortran/35993] [4.3 regression] wrong answer for all array intrinsics with scalar mask
2008-04-20 20:13 [Bug fortran/35993] New: wrong answer for PRODUCT with scalar mask dick dot hendrickson at gmail dot com
` (12 preceding siblings ...)
2008-04-30 16:57 ` tkoenig at gcc dot gnu dot org
@ 2008-04-30 18:06 ` tkoenig at gcc dot gnu dot org
2008-05-03 20:40 ` tkoenig at gcc dot gnu dot org
2008-05-03 20:42 ` tkoenig at gcc dot gnu dot org
15 siblings, 0 replies; 17+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2008-04-30 18:06 UTC (permalink / raw)
To: gcc-bugs
------- Comment #13 from tkoenig at gcc dot gnu dot org 2008-04-30 18:05 -------
Fixed on trunk; will backport to 4.3.
--
tkoenig at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Summary|[4.3/4.4 regression] wrong |[4.3 regression] wrong
|answer for all array |answer for all array
|intrinsics with scalar mask |intrinsics with scalar mask
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35993
^ permalink raw reply [flat|nested] 17+ messages in thread
* [Bug fortran/35993] [4.3 regression] wrong answer for all array intrinsics with scalar mask
2008-04-20 20:13 [Bug fortran/35993] New: wrong answer for PRODUCT with scalar mask dick dot hendrickson at gmail dot com
` (13 preceding siblings ...)
2008-04-30 18:06 ` [Bug fortran/35993] [4.3 " tkoenig at gcc dot gnu dot org
@ 2008-05-03 20:40 ` tkoenig at gcc dot gnu dot org
2008-05-03 20:42 ` tkoenig at gcc dot gnu dot org
15 siblings, 0 replies; 17+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2008-05-03 20:40 UTC (permalink / raw)
To: gcc-bugs
------- Comment #14 from tkoenig at gcc dot gnu dot org 2008-05-03 20:40 -------
Subject: Bug 35993
Author: tkoenig
Date: Sat May 3 20:39:24 2008
New Revision: 134919
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=134919
Log:
2008-05-03 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/35993
Backport from trunk.
* ifunction.m4 (SCALAR_ARRAY_FUNCTION): Use correct
implementation for multi-dimensional return arrays when
the mask is .false.
* generated/maxloc1_16_i1.c: Regenerated.
* generated/maxloc1_16_i16.c: Regenerated.
* generated/maxloc1_16_i2.c: Regenerated.
* generated/maxloc1_16_i4.c: Regenerated.
* generated/maxloc1_16_i8.c: Regenerated.
* generated/maxloc1_16_r10.c: Regenerated.
* generated/maxloc1_16_r16.c: Regenerated.
* generated/maxloc1_16_r4.c: Regenerated.
* generated/maxloc1_16_r8.c: Regenerated.
* generated/maxloc1_4_i1.c: Regenerated.
* generated/maxloc1_4_i16.c: Regenerated.
* generated/maxloc1_4_i2.c: Regenerated.
* generated/maxloc1_4_i4.c: Regenerated.
* generated/maxloc1_4_i8.c: Regenerated.
* generated/maxloc1_4_r10.c: Regenerated.
* generated/maxloc1_4_r16.c: Regenerated.
* generated/maxloc1_4_r4.c: Regenerated.
* generated/maxloc1_4_r8.c: Regenerated.
* generated/maxloc1_8_i1.c: Regenerated.
* generated/maxloc1_8_i16.c: Regenerated.
* generated/maxloc1_8_i2.c: Regenerated.
* generated/maxloc1_8_i4.c: Regenerated.
* generated/maxloc1_8_i8.c: Regenerated.
* generated/maxloc1_8_r10.c: Regenerated.
* generated/maxloc1_8_r16.c: Regenerated.
* generated/maxloc1_8_r4.c: Regenerated.
* generated/maxloc1_8_r8.c: Regenerated.
* generated/maxval_i1.c: Regenerated.
* generated/maxval_i16.c: Regenerated.
* generated/maxval_i2.c: Regenerated.
* generated/maxval_i4.c: Regenerated.
* generated/maxval_i8.c: Regenerated.
* generated/maxval_r10.c: Regenerated.
* generated/maxval_r16.c: Regenerated.
* generated/maxval_r4.c: Regenerated.
* generated/maxval_r8.c: Regenerated.
* generated/minloc1_16_i1.c: Regenerated.
* generated/minloc1_16_i16.c: Regenerated.
* generated/minloc1_16_i2.c: Regenerated.
* generated/minloc1_16_i4.c: Regenerated.
* generated/minloc1_16_i8.c: Regenerated.
* generated/minloc1_16_r10.c: Regenerated.
* generated/minloc1_16_r16.c: Regenerated.
* generated/minloc1_16_r4.c: Regenerated.
* generated/minloc1_16_r8.c: Regenerated.
* generated/minloc1_4_i1.c: Regenerated.
* generated/minloc1_4_i16.c: Regenerated.
* generated/minloc1_4_i2.c: Regenerated.
* generated/minloc1_4_i4.c: Regenerated.
* generated/minloc1_4_i8.c: Regenerated.
* generated/minloc1_4_r10.c: Regenerated.
* generated/minloc1_4_r16.c: Regenerated.
* generated/minloc1_4_r4.c: Regenerated.
* generated/minloc1_4_r8.c: Regenerated.
* generated/minloc1_8_i1.c: Regenerated.
* generated/minloc1_8_i16.c: Regenerated.
* generated/minloc1_8_i2.c: Regenerated.
* generated/minloc1_8_i4.c: Regenerated.
* generated/minloc1_8_i8.c: Regenerated.
* generated/minloc1_8_r10.c: Regenerated.
* generated/minloc1_8_r16.c: Regenerated.
* generated/minloc1_8_r4.c: Regenerated.
* generated/minloc1_8_r8.c: Regenerated.
* generated/minval_i1.c: Regenerated.
* generated/minval_i16.c: Regenerated.
* generated/minval_i2.c: Regenerated.
* generated/minval_i4.c: Regenerated.
* generated/minval_i8.c: Regenerated.
* generated/minval_r10.c: Regenerated.
* generated/minval_r16.c: Regenerated.
* generated/minval_r4.c: Regenerated.
* generated/minval_r8.c: Regenerated.
* generated/product_c10.c: Regenerated.
* generated/product_c16.c: Regenerated.
* generated/product_c4.c: Regenerated.
* generated/product_c8.c: Regenerated.
* generated/product_i1.c: Regenerated.
* generated/product_i16.c: Regenerated.
* generated/product_i2.c: Regenerated.
* generated/product_i4.c: Regenerated.
* generated/product_i8.c: Regenerated.
* generated/product_r10.c: Regenerated.
* generated/product_r16.c: Regenerated.
* generated/product_r4.c: Regenerated.
* generated/product_r8.c: Regenerated.
* generated/sum_c10.c: Regenerated.
* generated/sum_c16.c: Regenerated.
* generated/sum_c4.c: Regenerated.
* generated/sum_c8.c: Regenerated.
* generated/sum_i1.c: Regenerated.
* generated/sum_i16.c: Regenerated.
* generated/sum_i2.c: Regenerated.
* generated/sum_i4.c: Regenerated.
* generated/sum_i8.c: Regenerated.
* generated/sum_r10.c: Regenerated.
* generated/sum_r16.c: Regenerated.
* generated/sum_r4.c: Regenerated.
* generated/sum_r8.c: Regenerated.
2008-05-03 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/35993
Backport from trunk.
* gfortran.dg/intrinsic_product_1.f90: New test case.
Added:
branches/gcc-4_3-branch/gcc/testsuite/gfortran.dg/intrinsic_product_1.f90
Modified:
branches/gcc-4_3-branch/gcc/testsuite/ChangeLog
branches/gcc-4_3-branch/libgfortran/ChangeLog
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_i1.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_i16.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_i2.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_i4.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_i8.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_r10.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_r16.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_r4.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_r8.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_i1.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_i16.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_i2.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_i4.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_i8.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_r10.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_r16.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_r4.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_r8.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_i1.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_i16.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_i2.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_i4.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_i8.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_r10.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_r16.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_r4.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_r8.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_i1.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_i16.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_i2.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_i4.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_i8.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_r10.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_r16.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_r4.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_r8.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_i1.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_i16.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_i2.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_i4.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_i8.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_r10.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_r16.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_r4.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_r8.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_i1.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_i16.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_i2.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_i4.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_i8.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_r10.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_r16.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_r4.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_r8.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_i1.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_i16.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_i2.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_i4.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_i8.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_r10.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_r16.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_r4.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_r8.c
branches/gcc-4_3-branch/libgfortran/generated/minval_i1.c
branches/gcc-4_3-branch/libgfortran/generated/minval_i16.c
branches/gcc-4_3-branch/libgfortran/generated/minval_i2.c
branches/gcc-4_3-branch/libgfortran/generated/minval_i4.c
branches/gcc-4_3-branch/libgfortran/generated/minval_i8.c
branches/gcc-4_3-branch/libgfortran/generated/minval_r10.c
branches/gcc-4_3-branch/libgfortran/generated/minval_r16.c
branches/gcc-4_3-branch/libgfortran/generated/minval_r4.c
branches/gcc-4_3-branch/libgfortran/generated/minval_r8.c
branches/gcc-4_3-branch/libgfortran/generated/product_c10.c
branches/gcc-4_3-branch/libgfortran/generated/product_c16.c
branches/gcc-4_3-branch/libgfortran/generated/product_c4.c
branches/gcc-4_3-branch/libgfortran/generated/product_c8.c
branches/gcc-4_3-branch/libgfortran/generated/product_i1.c
branches/gcc-4_3-branch/libgfortran/generated/product_i16.c
branches/gcc-4_3-branch/libgfortran/generated/product_i2.c
branches/gcc-4_3-branch/libgfortran/generated/product_i4.c
branches/gcc-4_3-branch/libgfortran/generated/product_i8.c
branches/gcc-4_3-branch/libgfortran/generated/product_r10.c
branches/gcc-4_3-branch/libgfortran/generated/product_r16.c
branches/gcc-4_3-branch/libgfortran/generated/product_r4.c
branches/gcc-4_3-branch/libgfortran/generated/product_r8.c
branches/gcc-4_3-branch/libgfortran/generated/sum_c10.c
branches/gcc-4_3-branch/libgfortran/generated/sum_c16.c
branches/gcc-4_3-branch/libgfortran/generated/sum_c4.c
branches/gcc-4_3-branch/libgfortran/generated/sum_c8.c
branches/gcc-4_3-branch/libgfortran/generated/sum_i1.c
branches/gcc-4_3-branch/libgfortran/generated/sum_i16.c
branches/gcc-4_3-branch/libgfortran/generated/sum_i2.c
branches/gcc-4_3-branch/libgfortran/generated/sum_i4.c
branches/gcc-4_3-branch/libgfortran/generated/sum_i8.c
branches/gcc-4_3-branch/libgfortran/generated/sum_r10.c
branches/gcc-4_3-branch/libgfortran/generated/sum_r16.c
branches/gcc-4_3-branch/libgfortran/generated/sum_r4.c
branches/gcc-4_3-branch/libgfortran/generated/sum_r8.c
branches/gcc-4_3-branch/libgfortran/m4/ifunction.m4
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35993
^ permalink raw reply [flat|nested] 17+ messages in thread
* [Bug fortran/35993] [4.3 regression] wrong answer for all array intrinsics with scalar mask
2008-04-20 20:13 [Bug fortran/35993] New: wrong answer for PRODUCT with scalar mask dick dot hendrickson at gmail dot com
` (14 preceding siblings ...)
2008-05-03 20:40 ` tkoenig at gcc dot gnu dot org
@ 2008-05-03 20:42 ` tkoenig at gcc dot gnu dot org
15 siblings, 0 replies; 17+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2008-05-03 20:42 UTC (permalink / raw)
To: gcc-bugs
------- Comment #15 from tkoenig at gcc dot gnu dot org 2008-05-03 20:41 -------
Fixed on 4.3 as well (after regression-testing and
checking on gcc-testresults that there were
no regressions on trunk).
Closing.
--
tkoenig at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|ASSIGNED |RESOLVED
Resolution| |FIXED
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35993
^ permalink raw reply [flat|nested] 17+ messages in thread