--- Comment #8 from tkoenig at gcc dot gnu dot org 2009-12-05 21:54 ---
As far as I can see, this is fixed.
Closing.
--
tkoenig at gcc dot gnu dot org changed:
What|Removed |Added
---
--- Comment #7 from jakub at gcc dot gnu dot org 2009-07-24 07:57 ---
Subject: Bug 40643
Author: jakub
Date: Fri Jul 24 07:57:13 2009
New Revision: 150041
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=150041
Log:
PR fortran/40643
PR fortran/31067
* trans
--- Comment #6 from tkoenig at gcc dot gnu dot org 2009-07-14 19:18 ---
See also PR 30694.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40643
--- Comment #5 from jakub at gcc dot gnu dot org 2009-07-14 13:31 ---
Created an attachment (id=18193)
--> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=18193&action=view)
gcc45-pr40643.patch
And now a patch which uses two loops instead of one if needed for performance
(in the honor n
--- Comment #4 from jakub at gcc dot gnu dot org 2009-07-14 13:26 ---
Created an attachment (id=18192)
--> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=18192&action=view)
gcc45-pr40643.patch
Slightly adjusted patch, so that even when array size isn't known compile time
constant it ca
--- Comment #3 from burnus at gcc dot gnu dot org 2009-07-10 19:02 ---
Created an attachment (id=18175)
--> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=18175&action=view)
Results for the testcase with ifort, sunf95, NAG f95, openf95, g95
> Is this the behavior we want?
Good question
--- Comment #2 from jakub at gcc dot gnu dot org 2009-07-10 16:31 ---
Created an attachment (id=18174)
--> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=18174&action=view)
gcc45-pr40643.patch
Inline minmaxloc patch.
Is this the behavior we want?
If NaNs aren't supported and array size
--
fxcoudert at gcc dot gnu dot org changed:
What|Removed |Added
Status|UNCONFIRMED |NEW
Ever Confirmed|0 |1
Last recon
--- Comment #1 from jakub at gcc dot gnu dot org 2009-07-03 19:30 ---
Even the inline version is wrong I think.
real :: r(4), z
z = 0.0
r = (/ z/z, z/z, z/z, z/z /)
print *,r
print *, minloc(r,dim=1), minval(r,dim=1)
print *, maxloc(r,dim=1), maxval(r,dim=1)
end
Not sure what minval/max