* [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe
2020-11-27 3:22 [Bug fortran/98022] New: ICE in gfc_assign_data_value, at fortran/data.c:468 asolokha at gmx dot com
@ 2020-11-27 11:18 ` marxin at gcc dot gnu.org
2020-11-27 11:26 ` pault at gcc dot gnu.org
` (13 subsequent siblings)
14 siblings, 0 replies; 16+ messages in thread
From: marxin at gcc dot gnu.org @ 2020-11-27 11:18 UTC (permalink / raw)
To: gcc-bugs
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
Martin Liška <marxin at gcc dot gnu.org> changed:
What |Removed |Added
----------------------------------------------------------------------------
Priority|P3 |P4
Ever confirmed|0 |1
CC| |marxin at gcc dot gnu.org,
| |pault at gcc dot gnu.org
Last reconfirmed| |2020-11-27
Status|UNCONFIRMED |NEW
Summary|ICE in |[9/10/11 Regression] ICE in
|gfc_assign_data_value, at |gfc_assign_data_value, at
|fortran/data.c:468 |fortran/data.c:468 since
| |r9-3803-ga5fbc2f36a291cbe
Target Milestone|--- |9.4
--- Comment #1 from Martin Liška <marxin at gcc dot gnu.org> ---
Confirmed, started with r9-3803-ga5fbc2f36a291cbe.
^ permalink raw reply [flat|nested] 16+ messages in thread
* [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe
2020-11-27 3:22 [Bug fortran/98022] New: ICE in gfc_assign_data_value, at fortran/data.c:468 asolokha at gmx dot com
2020-11-27 11:18 ` [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe marxin at gcc dot gnu.org
@ 2020-11-27 11:26 ` pault at gcc dot gnu.org
2020-12-09 17:25 ` pault at gcc dot gnu.org
` (12 subsequent siblings)
14 siblings, 0 replies; 16+ messages in thread
From: pault at gcc dot gnu.org @ 2020-11-27 11:26 UTC (permalink / raw)
To: gcc-bugs
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
Paul Thomas <pault at gcc dot gnu.org> changed:
What |Removed |Added
----------------------------------------------------------------------------
Assignee|unassigned at gcc dot gnu.org |pault at gcc dot gnu.org
--- Comment #2 from Paul Thomas <pault at gcc dot gnu.org> ---
This is not a regression IMHO since the inquiry reference feature (ie. ...%re)
was introduced by the commit reference in comment 1.
That said, it does remove the syntax error for the non-existent feature with an
ICE.
Paul
^ permalink raw reply [flat|nested] 16+ messages in thread
* [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe
2020-11-27 3:22 [Bug fortran/98022] New: ICE in gfc_assign_data_value, at fortran/data.c:468 asolokha at gmx dot com
2020-11-27 11:18 ` [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe marxin at gcc dot gnu.org
2020-11-27 11:26 ` pault at gcc dot gnu.org
@ 2020-12-09 17:25 ` pault at gcc dot gnu.org
2020-12-09 18:13 ` kargl at gcc dot gnu.org
` (11 subsequent siblings)
14 siblings, 0 replies; 16+ messages in thread
From: pault at gcc dot gnu.org @ 2020-12-09 17:25 UTC (permalink / raw)
To: gcc-bugs
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
--- Comment #3 from Paul Thomas <pault at gcc dot gnu.org> ---
Created attachment 49722
--> https://gcc.gnu.org/bugzilla/attachment.cgi?id=49722&action=edit
Tentative patch for the PR
The attached regtests OK and the following runs correctly:
module ur
contains
function kn1() result(hm2)
complex :: hm(1:2), hm2(1:2)
data (hm(md)%re, md=1,2)/1.0, 2.0/
hm2 = hm
end function kn1
function kn2() result(hm2)
complex :: hm(1:2), hm2(1:2)
data (hm(md)%im, md=1,2)/1.0, 2.0/
hm2 = hm
end function kn2
end module ur
use ur
if (any (kn1() .ne. [(1.0,0.0),(2.0,0.0)])) stop 1
if (any (kn2() .ne. [(0.0,1.0),(0.0,2.0)])) stop 2
end
I have yet to test inquiry references of derived type components. I suspect
that a bit more work is needed.
Watch this space
Paul
^ permalink raw reply [flat|nested] 16+ messages in thread
* [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe
2020-11-27 3:22 [Bug fortran/98022] New: ICE in gfc_assign_data_value, at fortran/data.c:468 asolokha at gmx dot com
` (2 preceding siblings ...)
2020-12-09 17:25 ` pault at gcc dot gnu.org
@ 2020-12-09 18:13 ` kargl at gcc dot gnu.org
2020-12-12 14:01 ` cvs-commit at gcc dot gnu.org
` (10 subsequent siblings)
14 siblings, 0 replies; 16+ messages in thread
From: kargl at gcc dot gnu.org @ 2020-12-09 18:13 UTC (permalink / raw)
To: gcc-bugs
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
kargl at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |kargl at gcc dot gnu.org
--- Comment #4 from kargl at gcc dot gnu.org ---
(In reply to Paul Thomas from comment #3)
> function kn1() result(hm2)
> complex :: hm(1:2), hm2(1:2)
> data (hm(md)%re, md=1,2)/1.0, 2.0/
> hm2 = hm
> end function kn1
Are you sure that this is valid Fortran? I cannot
find anything in the Fortran standard that says hm%im
is defined. Thus, 'hm2=hm' is referencing a variable
that is no completely defined.
19.6.1 Definition of objects and subobjects
2 Arrays, including sections, and variables of derived, character,
or complex type are objects that consist of zero or more subobjects.
Associations may be established between variables and subobjects and
between subobjects of different variables. These subobjects may become
defined or undefined.
5 A complex or character scalar object is defined if and only if all
of its subobjects are defined.
^ permalink raw reply [flat|nested] 16+ messages in thread
* [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe
2020-11-27 3:22 [Bug fortran/98022] New: ICE in gfc_assign_data_value, at fortran/data.c:468 asolokha at gmx dot com
` (3 preceding siblings ...)
2020-12-09 18:13 ` kargl at gcc dot gnu.org
@ 2020-12-12 14:01 ` cvs-commit at gcc dot gnu.org
2020-12-12 16:02 ` pault at gcc dot gnu.org
` (9 subsequent siblings)
14 siblings, 0 replies; 16+ messages in thread
From: cvs-commit at gcc dot gnu.org @ 2020-12-12 14:01 UTC (permalink / raw)
To: gcc-bugs
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
--- Comment #5 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The master branch has been updated by Paul Thomas <pault@gcc.gnu.org>:
https://gcc.gnu.org/g:ff2dfdef2f2e01c579dd280daa1d81fbeb4d7ac5
commit r11-5959-gff2dfdef2f2e01c579dd280daa1d81fbeb4d7ac5
Author: Paul Thomas <pault@gcc.gnu.org>
Date: Sat Dec 12 14:01:08 2020 +0000
Fortran: Enable inquiry references in data statements [PR98022].
2020-12-12 Paul Thomas <pault@gcc.gnu.org>
gcc/fortran
PR fortran/98022
* data.c (gfc_assign_data_value): Handle inquiry references in
the data statement object list.
gcc/testsuite/
PR fortran/98022
* gfortran.dg/data_inquiry_ref.f90: New test.
^ permalink raw reply [flat|nested] 16+ messages in thread
* [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe
2020-11-27 3:22 [Bug fortran/98022] New: ICE in gfc_assign_data_value, at fortran/data.c:468 asolokha at gmx dot com
` (4 preceding siblings ...)
2020-12-12 14:01 ` cvs-commit at gcc dot gnu.org
@ 2020-12-12 16:02 ` pault at gcc dot gnu.org
2020-12-12 16:34 ` sgk at troutmask dot apl.washington.edu
` (8 subsequent siblings)
14 siblings, 0 replies; 16+ messages in thread
From: pault at gcc dot gnu.org @ 2020-12-12 16:02 UTC (permalink / raw)
To: gcc-bugs
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
--- Comment #6 from Paul Thomas <pault at gcc dot gnu.org> ---
(In reply to kargl from comment #4)
> (In reply to Paul Thomas from comment #3)
>
> > function kn1() result(hm2)
> > complex :: hm(1:2), hm2(1:2)
> > data (hm(md)%re, md=1,2)/1.0, 2.0/
> > hm2 = hm
> > end function kn1
>
> Are you sure that this is valid Fortran? I cannot
> find anything in the Fortran standard that says hm%im
> is defined. Thus, 'hm2=hm' is referencing a variable
> that is no completely defined.
>
>
> 19.6.1 Definition of objects and subobjects
>
> 2 Arrays, including sections, and variables of derived, character,
> or complex type are objects that consist of zero or more subobjects.
> Associations may be established between variables and subobjects and
> between subobjects of different variables. These subobjects may become
> defined or undefined.
>
> 5 A complex or character scalar object is defined if and only if all
> of its subobjects are defined.
Hi Steve,
I saw your comment a bit too late. I think that you are correct. I guess that,
at very least, I should not zero out the undefined part of the complex object?
That way it would be equivalent to using assignment to achieve the same thing
or to partially define a derived type.
I'll post on clf.
Cheers
Paul
^ permalink raw reply [flat|nested] 16+ messages in thread
* [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe
2020-11-27 3:22 [Bug fortran/98022] New: ICE in gfc_assign_data_value, at fortran/data.c:468 asolokha at gmx dot com
` (5 preceding siblings ...)
2020-12-12 16:02 ` pault at gcc dot gnu.org
@ 2020-12-12 16:34 ` sgk at troutmask dot apl.washington.edu
2020-12-12 17:54 ` pault at gcc dot gnu.org
` (7 subsequent siblings)
14 siblings, 0 replies; 16+ messages in thread
From: sgk at troutmask dot apl.washington.edu @ 2020-12-12 16:34 UTC (permalink / raw)
To: gcc-bugs
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
--- Comment #7 from Steve Kargl <sgk at troutmask dot apl.washington.edu> ---
On Sat, Dec 12, 2020 at 04:02:54PM +0000, pault at gcc dot gnu.org wrote:
> https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
>
> --- Comment #6 from Paul Thomas <pault at gcc dot gnu.org> ---
> (In reply to kargl from comment #4)
> > (In reply to Paul Thomas from comment #3)
> >
> > > function kn1() result(hm2)
> > > complex :: hm(1:2), hm2(1:2)
> > > data (hm(md)%re, md=1,2)/1.0, 2.0/
> > > hm2 = hm
> > > end function kn1
> >
> > Are you sure that this is valid Fortran? I cannot
> > find anything in the Fortran standard that says hm%im
> > is defined. Thus, 'hm2=hm' is referencing a variable
> > that is no completely defined.
> >
> >
> > 19.6.1 Definition of objects and subobjects
> >
> > 2 Arrays, including sections, and variables of derived, character,
> > or complex type are objects that consist of zero or more subobjects.
> > Associations may be established between variables and subobjects and
> > between subobjects of different variables. These subobjects may become
> > defined or undefined.
> >
> > 5 A complex or character scalar object is defined if and only if all
> > of its subobjects are defined.
>
> Hi Steve,
>
> I saw your comment a bit too late. I think that you are correct. I guess that,
> at very least, I should not zero out the undefined part of the complex object?
> That way it would be equivalent to using assignment to achieve the same thing
> or to partially define a derived type.
>
> I'll post on clf.
>
I recall looking at this PR a long time ago, but came up empty
with ideas on how to fix it. You've some made some progress.
It gets messy (at least to me) to determine if it is valid,
and comes from reading 8.6.7 "Data statement", carefully.
One gets to
A data-stmt-constant other than boz-literal-constant, null-init,
or initial-data-target shall be compatible with its corresponding
variable according to the rules of intrinsic assignment (10.2.1.2).
The variable is initially defined with the value specified by the
data-stmt-constant; if necessary, the value is converted according
to the rules of intrinsic assignment (10.2.1.3) to a value that
agrees in type, type parameters, and shape with the variable.
Now, we go to "what is a variable?"
R902 variable is designator
R901 designator is ...
or complex-part-designator
...
R915 complex-part-designator is designator % RE
or designator % IM
In your example, hm%re is real, so the rules for intrinsic
assignment to a real applies.
Of course, I could be wrong.
^ permalink raw reply [flat|nested] 16+ messages in thread
* [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe
2020-11-27 3:22 [Bug fortran/98022] New: ICE in gfc_assign_data_value, at fortran/data.c:468 asolokha at gmx dot com
` (6 preceding siblings ...)
2020-12-12 16:34 ` sgk at troutmask dot apl.washington.edu
@ 2020-12-12 17:54 ` pault at gcc dot gnu.org
2020-12-12 18:24 ` sgk at troutmask dot apl.washington.edu
` (6 subsequent siblings)
14 siblings, 0 replies; 16+ messages in thread
From: pault at gcc dot gnu.org @ 2020-12-12 17:54 UTC (permalink / raw)
To: gcc-bugs
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
--- Comment #8 from Paul Thomas <pault at gcc dot gnu.org> ---
The example that you give shows that setting the undefined part to zero
certainly is not correct. I updated my tree for the commit and am only just now
rebuilding. It'll be tomorrow before I put this right.
I guess that this is in the category of invalid but not forbidden. It's in the
same category as:
complex :: a, b
a%im = 1.0
b = a
print *, a, b
end
Thanks
Paul
^ permalink raw reply [flat|nested] 16+ messages in thread
* [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe
2020-11-27 3:22 [Bug fortran/98022] New: ICE in gfc_assign_data_value, at fortran/data.c:468 asolokha at gmx dot com
` (7 preceding siblings ...)
2020-12-12 17:54 ` pault at gcc dot gnu.org
@ 2020-12-12 18:24 ` sgk at troutmask dot apl.washington.edu
2020-12-26 16:44 ` cvs-commit at gcc dot gnu.org
` (5 subsequent siblings)
14 siblings, 0 replies; 16+ messages in thread
From: sgk at troutmask dot apl.washington.edu @ 2020-12-12 18:24 UTC (permalink / raw)
To: gcc-bugs
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
--- Comment #9 from Steve Kargl <sgk at troutmask dot apl.washington.edu> ---
On Sat, Dec 12, 2020 at 05:54:43PM +0000, pault at gcc dot gnu.org wrote:
> https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
>
> --- Comment #8 from Paul Thomas <pault at gcc dot gnu.org> ---
> The example that you give shows that setting the undefined part to zero
> certainly is not correct. I updated my tree for the commit and am only just now
> rebuilding. It'll be tomorrow before I put this right.
>
> I guess that this is in the category of invalid but not forbidden. It's in the
> same category as:
> complex :: a, b
> a%im = 1.0
> b = a
> print *, a, b
> end
>
Yes, it's invalid under the same portion of section 19 I quoted earlier.
'a' is undefined because 'a%re' is undefined. I cannot find anything
in the Standard that requires an error or a warning message.
^ permalink raw reply [flat|nested] 16+ messages in thread
* [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe
2020-11-27 3:22 [Bug fortran/98022] New: ICE in gfc_assign_data_value, at fortran/data.c:468 asolokha at gmx dot com
` (8 preceding siblings ...)
2020-12-12 18:24 ` sgk at troutmask dot apl.washington.edu
@ 2020-12-26 16:44 ` cvs-commit at gcc dot gnu.org
2021-01-23 10:37 ` cvs-commit at gcc dot gnu.org
` (4 subsequent siblings)
14 siblings, 0 replies; 16+ messages in thread
From: cvs-commit at gcc dot gnu.org @ 2020-12-26 16:44 UTC (permalink / raw)
To: gcc-bugs
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
--- Comment #10 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The master branch has been updated by Paul Thomas <pault@gcc.gnu.org>:
https://gcc.gnu.org/g:c7256c8260afa313e019fd531574ad33ec49b9f6
commit r11-6342-gc7256c8260afa313e019fd531574ad33ec49b9f6
Author: Paul Thomas <pault@gcc.gnu.org>
Date: Sat Dec 26 16:44:24 2020 +0000
Fortran: Correction to recent patch in light of comments [PR98022].
2020-12-26 Paul Thomas <pault@gcc.gnu.org>
gcc/fortran
PR fortran/98022
* data.c (gfc_assign_data_value): Throw an error for inquiry
references. Follow with corrected code that would provide the
expected result and provides clean error recovery.
gcc/testsuite/
PR fortran/98022
* gfortran.dg/data_inquiry_ref.f90: Change to dg-compile and
add errors for inquiry references.
^ permalink raw reply [flat|nested] 16+ messages in thread
* [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe
2020-11-27 3:22 [Bug fortran/98022] New: ICE in gfc_assign_data_value, at fortran/data.c:468 asolokha at gmx dot com
` (9 preceding siblings ...)
2020-12-26 16:44 ` cvs-commit at gcc dot gnu.org
@ 2021-01-23 10:37 ` cvs-commit at gcc dot gnu.org
2021-01-23 10:43 ` cvs-commit at gcc dot gnu.org
` (3 subsequent siblings)
14 siblings, 0 replies; 16+ messages in thread
From: cvs-commit at gcc dot gnu.org @ 2021-01-23 10:37 UTC (permalink / raw)
To: gcc-bugs
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
--- Comment #11 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The releases/gcc-10 branch has been updated by Paul Thomas <pault@gcc.gnu.org>:
https://gcc.gnu.org/g:259c63ce6d73f05bec3f84f36305ee71e435b62e
commit r10-9290-g259c63ce6d73f05bec3f84f36305ee71e435b62e
Author: Paul Thomas <pault@gcc.gnu.org>
Date: Sat Dec 12 14:01:08 2020 +0000
Fortran: Enable inquiry references in data statements [PR98022].
2020-12-12 Paul Thomas <pault@gcc.gnu.org>
gcc/fortran
PR fortran/98022
* data.c (gfc_assign_data_value): Handle inquiry references in
the data statement object list.
gcc/testsuite/
PR fortran/98022
* gfortran.dg/data_inquiry_ref.f90: New test.
(cherry picked from commit ff2dfdef2f2e01c579dd280daa1d81fbeb4d7ac5)
^ permalink raw reply [flat|nested] 16+ messages in thread
* [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe
2020-11-27 3:22 [Bug fortran/98022] New: ICE in gfc_assign_data_value, at fortran/data.c:468 asolokha at gmx dot com
` (10 preceding siblings ...)
2021-01-23 10:37 ` cvs-commit at gcc dot gnu.org
@ 2021-01-23 10:43 ` cvs-commit at gcc dot gnu.org
2021-01-23 10:44 ` cvs-commit at gcc dot gnu.org
` (2 subsequent siblings)
14 siblings, 0 replies; 16+ messages in thread
From: cvs-commit at gcc dot gnu.org @ 2021-01-23 10:43 UTC (permalink / raw)
To: gcc-bugs
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
--- Comment #12 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The releases/gcc-10 branch has been updated by Paul Thomas <pault@gcc.gnu.org>:
https://gcc.gnu.org/g:0184527ae9f81ef3865703b43212963b95ae174d
commit r10-9291-g0184527ae9f81ef3865703b43212963b95ae174d
Author: Paul Thomas <pault@gcc.gnu.org>
Date: Sat Dec 26 16:44:24 2020 +0000
Fortran: Correction to recent patch in light of comments [PR98022].
2020-12-26 Paul Thomas <pault@gcc.gnu.org>
gcc/fortran
PR fortran/98022
* data.c (gfc_assign_data_value): Throw an error for inquiry
references. Follow with corrected code that would provide the
expected result and provides clean error recovery.
gcc/testsuite/
PR fortran/98022
* gfortran.dg/data_inquiry_ref.f90: Change to dg-compile and
add errors for inquiry references.
(cherry picked from commit c7256c8260afa313e019fd531574ad33ec49b9f6)
^ permalink raw reply [flat|nested] 16+ messages in thread
* [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe
2020-11-27 3:22 [Bug fortran/98022] New: ICE in gfc_assign_data_value, at fortran/data.c:468 asolokha at gmx dot com
` (11 preceding siblings ...)
2021-01-23 10:43 ` cvs-commit at gcc dot gnu.org
@ 2021-01-23 10:44 ` cvs-commit at gcc dot gnu.org
2021-01-23 10:44 ` cvs-commit at gcc dot gnu.org
2021-01-27 11:21 ` pault at gcc dot gnu.org
14 siblings, 0 replies; 16+ messages in thread
From: cvs-commit at gcc dot gnu.org @ 2021-01-23 10:44 UTC (permalink / raw)
To: gcc-bugs
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
--- Comment #13 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The releases/gcc-9 branch has been updated by Paul Thomas <pault@gcc.gnu.org>:
https://gcc.gnu.org/g:87472f174299fba9b17fdbcc016818587919bd12
commit r9-9196-g87472f174299fba9b17fdbcc016818587919bd12
Author: Paul Thomas <pault@gcc.gnu.org>
Date: Sat Dec 12 14:01:08 2020 +0000
Fortran: Enable inquiry references in data statements [PR98022].
2020-12-12 Paul Thomas <pault@gcc.gnu.org>
gcc/fortran
PR fortran/98022
* data.c (gfc_assign_data_value): Handle inquiry references in
the data statement object list.
gcc/testsuite/
PR fortran/98022
* gfortran.dg/data_inquiry_ref.f90: New test.
(cherry picked from commit ff2dfdef2f2e01c579dd280daa1d81fbeb4d7ac5)
^ permalink raw reply [flat|nested] 16+ messages in thread
* [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe
2020-11-27 3:22 [Bug fortran/98022] New: ICE in gfc_assign_data_value, at fortran/data.c:468 asolokha at gmx dot com
` (12 preceding siblings ...)
2021-01-23 10:44 ` cvs-commit at gcc dot gnu.org
@ 2021-01-23 10:44 ` cvs-commit at gcc dot gnu.org
2021-01-27 11:21 ` pault at gcc dot gnu.org
14 siblings, 0 replies; 16+ messages in thread
From: cvs-commit at gcc dot gnu.org @ 2021-01-23 10:44 UTC (permalink / raw)
To: gcc-bugs
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
--- Comment #14 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The releases/gcc-9 branch has been updated by Paul Thomas <pault@gcc.gnu.org>:
https://gcc.gnu.org/g:5c84d9e37d6a647bc2bbc83ac28250a4902a86ea
commit r9-9197-g5c84d9e37d6a647bc2bbc83ac28250a4902a86ea
Author: Paul Thomas <pault@gcc.gnu.org>
Date: Sat Dec 26 16:44:24 2020 +0000
Fortran: Correction to recent patch in light of comments [PR98022].
2020-12-26 Paul Thomas <pault@gcc.gnu.org>
gcc/fortran
PR fortran/98022
* data.c (gfc_assign_data_value): Throw an error for inquiry
references. Follow with corrected code that would provide the
expected result and provides clean error recovery.
gcc/testsuite/
PR fortran/98022
* gfortran.dg/data_inquiry_ref.f90: Change to dg-compile and
add errors for inquiry references.
(cherry picked from commit c7256c8260afa313e019fd531574ad33ec49b9f6)
^ permalink raw reply [flat|nested] 16+ messages in thread
* [Bug fortran/98022] [9/10/11 Regression] ICE in gfc_assign_data_value, at fortran/data.c:468 since r9-3803-ga5fbc2f36a291cbe
2020-11-27 3:22 [Bug fortran/98022] New: ICE in gfc_assign_data_value, at fortran/data.c:468 asolokha at gmx dot com
` (13 preceding siblings ...)
2021-01-23 10:44 ` cvs-commit at gcc dot gnu.org
@ 2021-01-27 11:21 ` pault at gcc dot gnu.org
14 siblings, 0 replies; 16+ messages in thread
From: pault at gcc dot gnu.org @ 2021-01-27 11:21 UTC (permalink / raw)
To: gcc-bugs
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98022
Paul Thomas <pault at gcc dot gnu.org> changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|NEW |RESOLVED
Resolution|--- |FIXED
--- Comment #15 from Paul Thomas <pault at gcc dot gnu.org> ---
Fixed on all three branches.
Thanks for the report.
Paul
^ permalink raw reply [flat|nested] 16+ messages in thread