public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug testsuite/98156] New: [Coarray] alloc_comp_1.f90 tests for wrong condition
@ 2020-12-05 20:46 tkoenig at gcc dot gnu.org
  2020-12-06  9:23 ` [Bug testsuite/98156] " tkoenig at gcc dot gnu.org
  0 siblings, 1 reply; 2+ messages in thread
From: tkoenig at gcc dot gnu.org @ 2020-12-05 20:46 UTC (permalink / raw)
  To: gcc-bugs

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98156

            Bug ID: 98156
           Summary: [Coarray] alloc_comp_1.f90 tests for wrong condition
           Product: gcc
           Version: 11.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: testsuite
          Assignee: unassigned at gcc dot gnu.org
          Reporter: tkoenig at gcc dot gnu.org
  Target Milestone: ---

alloc_comp_1.f90 has

! { dg-do run }
!
! Allocatable scalar corrays were mishandled (ICE)
!
type t
  integer, allocatable :: caf[:]
end type t
type(t) :: a
allocate (a%caf[3:*])
a%caf = 7
if (a%caf /= 7) STOP 1
print *,ucobound(a%caf,dim=1)
if (any (lcobound (a%caf) /= [ 3 ]) &
    .or. ucobound (a%caf, dim=1) /= this_image ()+2)  &
  STOP 2
deallocate (a%caf)
end

The second test about ucobound is clearly bogus - it should be
num_images() instead of this_image().

^ permalink raw reply	[flat|nested] 2+ messages in thread

* [Bug testsuite/98156] [Coarray] alloc_comp_1.f90 tests for wrong condition
  2020-12-05 20:46 [Bug testsuite/98156] New: [Coarray] alloc_comp_1.f90 tests for wrong condition tkoenig at gcc dot gnu.org
@ 2020-12-06  9:23 ` tkoenig at gcc dot gnu.org
  0 siblings, 0 replies; 2+ messages in thread
From: tkoenig at gcc dot gnu.org @ 2020-12-06  9:23 UTC (permalink / raw)
  To: gcc-bugs

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98156

Thomas Koenig <tkoenig at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         Resolution|---                         |FIXED
           Assignee|unassigned at gcc dot gnu.org      |tkoenig at gcc dot gnu.org
             Status|UNCONFIRMED                 |RESOLVED

--- Comment #1 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
Fixed by
https://gcc.gnu.org/git/gitweb.cgi?p=gcc.git;h=bd0f0243869b3941a256ca0ea9c8aca141412f7e 

Closing.

^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2020-12-06  9:23 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2020-12-05 20:46 [Bug testsuite/98156] New: [Coarray] alloc_comp_1.f90 tests for wrong condition tkoenig at gcc dot gnu.org
2020-12-06  9:23 ` [Bug testsuite/98156] " tkoenig at gcc dot gnu.org

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).