public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug testsuite/44792] data.f90 accesses undefined variable
[not found] <bug-44792-4@http.gcc.gnu.org/bugzilla/>
@ 2021-02-23 8:56 ` zeccav at gmail dot com
0 siblings, 0 replies; 3+ messages in thread
From: zeccav at gmail dot com @ 2021-02-23 8:56 UTC (permalink / raw)
To: gcc-bugs
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=44792
--- Comment #3 from Vittorio Zecca <zeccav at gmail dot com> ---
Still unmodified, I cannot see the modification of Tobias Burnus.
NAG nagfor compiler stll produces run time error message.
Runtime Error: gcc/testsuite/gfortran.fortran-torture/execute/data.f90, line
28: Reference to undefined variable TMP2(1)%T1(1)%A
^ permalink raw reply [flat|nested] 3+ messages in thread
* [Bug testsuite/44792] data.f90 accesses undefined variable
2010-07-02 19:42 [Bug testsuite/44792] New: " zeccav at gmail dot com
2010-07-02 20:41 ` [Bug testsuite/44792] " burnus at gcc dot gnu dot org
@ 2010-07-03 9:16 ` zeccav at gmail dot com
1 sibling, 0 replies; 3+ messages in thread
From: zeccav at gmail dot com @ 2010-07-03 9:16 UTC (permalink / raw)
To: gcc-bugs
------- Comment #2 from zeccav at gmail dot com 2010-07-03 09:15 -------
Subject: Re: data.f90 accesses undefined variable
I believe it should be
+ if (any(tmp2(1)%t1(1)%a(1:3:2) .ne. (/111,113/))) call abort
or (1:4:2)
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44792
^ permalink raw reply [flat|nested] 3+ messages in thread
* [Bug testsuite/44792] data.f90 accesses undefined variable
2010-07-02 19:42 [Bug testsuite/44792] New: " zeccav at gmail dot com
@ 2010-07-02 20:41 ` burnus at gcc dot gnu dot org
2010-07-03 9:16 ` zeccav at gmail dot com
1 sibling, 0 replies; 3+ messages in thread
From: burnus at gcc dot gnu dot org @ 2010-07-02 20:41 UTC (permalink / raw)
To: gcc-bugs
------- Comment #1 from burnus at gcc dot gnu dot org 2010-07-02 20:41 -------
Index: gfortran.fortran-torture/execute/data.f90
===================================================================
--- gfortran.fortran-torture/execute/data.f90 (Revision 161742)
+++ gfortran.fortran-torture/execute/data.f90
@@ -25,7 +25,7 @@
! array element reference
data tmp2(2)%t1(2)%a(3), tmp2(2)%t1(2)%a(1)/223,221/
- if (any(tmp2(1)%t1(1)%a .ne. (/111,0,113,0/))) call abort
+ if (any(tmp2(1)%t1(1)%a(2:4:2) .ne. (/111,113/))) call abort
if (tmp2(1)%t1(1)%r .ne. 0.0) call abort
if (tmp2(1)%b .ne. 10) call abort
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44792
^ permalink raw reply [flat|nested] 3+ messages in thread
end of thread, other threads:[~2021-02-23 8:56 UTC | newest]
Thread overview: 3+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
[not found] <bug-44792-4@http.gcc.gnu.org/bugzilla/>
2021-02-23 8:56 ` [Bug testsuite/44792] data.f90 accesses undefined variable zeccav at gmail dot com
2010-07-02 19:42 [Bug testsuite/44792] New: " zeccav at gmail dot com
2010-07-02 20:41 ` [Bug testsuite/44792] " burnus at gcc dot gnu dot org
2010-07-03 9:16 ` zeccav at gmail dot com
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).