From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <sourceware-bugzilla@sourceware.org>
Received: by sourceware.org (Postfix, from userid 48)
 id 38AC1386F467; Fri,  8 Jan 2021 14:14:05 +0000 (GMT)
DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 38AC1386F467
From: "vries at gcc dot gnu.org" <sourceware-bugzilla@sourceware.org>
To: gdb-prs@sourceware.org
Subject: [Bug testsuite/26997] [-m32] FAIL: gdb.fortran/array-slices.exp:
 repack=on: test 9: check sizes match
Date: Fri, 08 Jan 2021 14:14:05 +0000
X-Bugzilla-Reason: CC
X-Bugzilla-Type: changed
X-Bugzilla-Watch-Reason: None
X-Bugzilla-Product: gdb
X-Bugzilla-Component: testsuite
X-Bugzilla-Version: HEAD
X-Bugzilla-Keywords: 
X-Bugzilla-Severity: normal
X-Bugzilla-Who: vries at gcc dot gnu.org
X-Bugzilla-Status: NEW
X-Bugzilla-Resolution: 
X-Bugzilla-Priority: P2
X-Bugzilla-Assigned-To: unassigned at sourceware dot org
X-Bugzilla-Target-Milestone: ---
X-Bugzilla-Flags: 
X-Bugzilla-Changed-Fields: 
Message-ID: <bug-26997-4717-obxhbZWslU@http.sourceware.org/bugzilla/>
In-Reply-To: <bug-26997-4717@http.sourceware.org/bugzilla/>
References: <bug-26997-4717@http.sourceware.org/bugzilla/>
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable
X-Bugzilla-URL: http://sourceware.org/bugzilla/
Auto-Submitted: auto-generated
MIME-Version: 1.0
X-BeenThere: gdb-prs@sourceware.org
X-Mailman-Version: 2.1.29
Precedence: list
List-Id: Gdb-prs mailing list <gdb-prs.sourceware.org>
List-Unsubscribe: <https://sourceware.org/mailman/options/gdb-prs>,
 <mailto:gdb-prs-request@sourceware.org?subject=unsubscribe>
List-Archive: <https://sourceware.org/pipermail/gdb-prs/>
List-Help: <mailto:gdb-prs-request@sourceware.org?subject=help>
List-Subscribe: <https://sourceware.org/mailman/listinfo/gdb-prs>,
 <mailto:gdb-prs-request@sourceware.org?subject=subscribe>
X-List-Received-Date: Fri, 08 Jan 2021 14:14:05 -0000

https://sourceware.org/bugzilla/show_bug.cgi?id=3D26997

--- Comment #2 from Tom de Vries <vries at gcc dot gnu.org> ---
...
$ gdb -batch outputs/gdb.fortran/array-slices/array-slices \
  -ex "break 66" \
  -ex run \
  -ex "continue 4" \
  -ex up \
  -ex "print /x &array4d" \
  -ex "p /x sizeof (array4d)" \
  -ex "print /x (&array4d) + sizeof (array4d)"
  ...
$1 =3D 0xffffbe00
$2 =3D 0xc40
$3 =3D 0x95ce00
...

So, we expect the last to print 0xffffbe00 + 0xc40 =3D=3D 0xffffca40, but i=
nstead
we get 0x95ce00.

Using this patch, the FAILs are fixed:
...
$ git diff
diff --git a/gdb/testsuite/gdb.fortran/array-slices.exp
b/gdb/testsuite/gdb.fortran/array-slices
.exp
index f45a299b268..3ea17bdf777 100644
--- a/gdb/testsuite/gdb.fortran/array-slices.exp
+++ b/gdb/testsuite/gdb.fortran/array-slices.exp
@@ -208,7 +208,7 @@ proc run_test { repack } {
            set start_addr [get_hexadecimal_valueof "&${full_var_name}" \
                                "start unknown"]
            set end_addr [get_hexadecimal_valueof \
-                             "(&${full_var_name}) + sizeof (${full_var_nam=
e})"
\
+                             "(int)(&${full_var_name}) + sizeof
(${full_var_name})" \
                              "end unknown"]

            # The Fortran compiler can choose to either send a descriptor t=
hat
...

--=20
You are receiving this mail because:
You are on the CC list for the bug.=