https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
--- Comment #20 from kargl at gcc dot gnu.org ---
Author: kargl
Date: Fri Sep 30 17:54:15 2016
New Revision: 240671
URL: https://gcc.gnu.org/viewcvs?rev=240671=gcc=rev
Log:
2016-09-30 Steven G. Kargl
Backport from
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
Dominique d'Humieres changed:
What|Removed |Added
CC||patrick.seewald at gmail dot
com
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
--- Comment #18 from kargl at gcc dot gnu.org ---
(In reply to Jerry DeLisle from comment #17)
> (In reply to kargl from comment #16)
> > fixed on trunk.
>
> Thanks Steve, I am working on some other magic, did not get to it.
No big deal. As
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
--- Comment #17 from Jerry DeLisle ---
(In reply to kargl from comment #16)
> fixed on trunk.
Thanks Steve, I am working on some other magic, did not get to it.
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
kargl at gcc dot gnu.org changed:
What|Removed |Added
Status|ASSIGNED|RESOLVED
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
--- Comment #15 from kargl at gcc dot gnu.org ---
Author: kargl
Date: Sat Jul 30 23:01:06 2016
New Revision: 238911
URL: https://gcc.gnu.org/viewcvs?rev=238911=gcc=rev
Log:
2016-07-30 Steven G. Kargl
PR
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
Jerry DeLisle changed:
What|Removed |Added
Status|NEW |ASSIGNED
Assignee|unassigned
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
--- Comment #13 from Jerry DeLisle ---
(In reply to kargl from comment #12)
> ===
> --- check.c (revision 237855)
> +++ check.c (working copy)
> @@ -3820,7 +3820,7 @@
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
--- Comment #12 from kargl at gcc dot gnu.org ---
(In reply to Gerhard Steinmetz from comment #11)
> Another constellation (appearing legal) :
>
>
> $ cat zz1.f90
> program p
>integer :: n(2) = [2,1]
>print *, reshape ([1,2,3,4,5,6],
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
--- Comment #11 from Gerhard Steinmetz
---
Another constellation (appearing legal) :
$ cat zz1.f90
program p
integer :: n(2) = [2,1]
print *, reshape ([1,2,3,4,5,6], [2,4], [0,0], [2,1])
print
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
--- Comment #10 from Jerry DeLisle ---
Author: jvdelisle
Date: Sat Apr 9 19:09:02 2016
New Revision: 234864
URL: https://gcc.gnu.org/viewcvs?rev=234864=gcc=rev
Log:
2016-04-09 Jerry DeLisle
PR fortran/68566
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
--- Comment #9 from Jerry DeLisle ---
The following additional patchlet does the trick.
Still need to regression test.
diff --git a/gcc/fortran/array.c b/gcc/fortran/array.c
index 2fc9dfaf..8fef30ce 100644
--- a/gcc/fortran/array.c
+++
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
Jerry DeLisle changed:
What|Removed |Added
CC||jvdelisle at gcc dot gnu.org
---
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
--- Comment #7 from Harald Anlauf ---
Patch posted here:
https://gcc.gnu.org/ml/fortran/2016-03/msg00057.html
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
Harald Anlauf changed:
What|Removed |Added
CC||anlauf at gmx dot de
--- Comment #5
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
--- Comment #4 from Gerhard Steinmetz
---
Simplified a bit :
$ cat z7.f90
program p
integer, parameter :: a(:) = 1
integer, parameter :: b(2,2) = reshape([a], [2,2])
end
$ gfortran-6 z7.f90
***
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
--- Comment #6 from Harald Anlauf ---
(In reply to Harald Anlauf from comment #5)
The patch in comment #5 regtests without new failures.
It appears that a testcase based on comment #4 is sufficient:
Index:
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
Dominique d'Humieres changed:
What|Removed |Added
Status|UNCONFIRMED |NEW
Last reconfirmed|
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
kargl at gcc dot gnu.org changed:
What|Removed |Added
CC||kargl at gcc dot gnu.org
---
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
--- Comment #1 from Gerhard Steinmetz
---
Same issue with variants ...
$ cat z2.f90
program p
integer, parameter :: n = 2
integer, parameter :: a(2.) = 1
integer, parameter :: b(n, n) =
20 matches
Mail list logo