From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 48) id A08363858D20; Fri, 29 Mar 2024 12:17:37 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org A08363858D20 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=sourceware.org; s=default; t=1711714657; bh=Oqj+N5CROhMzj7tMETGORgNm2xdFjf9WhTOMZv5lfEY=; h=From:To:Subject:Date:In-Reply-To:References:From; b=xfVQrqvjxIWG7ufxRzav/baAOCla7sRwrvqZyvY9cl9Qhhjg52JYnhBqxTbjSdggE ulYhbhgQdPpks1Mx8vNd6EFmrsUcEnH5DW/+prNPhDZdIFWuuKUfX39fM3emPUmtWe 0v6cmQtabcEKdEI1ylVhYpscF2s2hGI653m1H1n8= From: "vries at gcc dot gnu.org" To: gdb-prs@sourceware.org Subject: [Bug ada/31574] [gdb, armv8l] FAIL: gdb.ada/verylong.exp: print x Date: Fri, 29 Mar 2024 12:17:37 +0000 X-Bugzilla-Reason: CC X-Bugzilla-Type: changed X-Bugzilla-Watch-Reason: None X-Bugzilla-Product: gdb X-Bugzilla-Component: ada 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: In-Reply-To: References: 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 List-Id: https://sourceware.org/bugzilla/show_bug.cgi?id=3D31574 --- Comment #3 from Tom de Vries --- Tentative fix: ... diff --git a/gdb/testsuite/gdb.ada/verylong.exp b/gdb/testsuite/gdb.ada/verylong.exp index 28b65a10f64..4a3e0b9eeb2 100644 --- a/gdb/testsuite/gdb.ada/verylong.exp +++ b/gdb/testsuite/gdb.ada/verylong.exp @@ -29,15 +29,29 @@ clean_restart ${testfile} set bp_location [gdb_get_line_number "START" ${testdir}/prog.adb] runto "prog.adb:$bp_location" -gdb_test "print x" " =3D 170141183460469231731687303715884105727" -gdb_test "print x / 2" " =3D 85070591730234615865843651857942052863" -gdb_test "print (x / 4) * 2" " =3D 85070591730234615865843651857942052862" +set lll_int_size 0 +gdb_test_multiple "ptype Long_Long_Long_Integer" "" { + -re -wrap "type =3D <8-byte integer>" { + set lll_int_size 8 + set max 9223372036854775807 + } + -re -wrap "type =3D <16-byte integer>" { + set lll_int_size 16 + set max 170141183460469231731687303715884105727 + } +} + +require {expr $lll_int_size =3D=3D 8 || $lll_int_size =3D=3D 16} + +gdb_test "print x" " =3D $max" +gdb_test "print x / 2" " =3D [expr $max / 2]" +gdb_test "print (x / 4) * 2" " =3D [expr ($max / 4) * 2]" gdb_test "print x - x" " =3D 0" -gdb_test "print x - 99 + 1" " =3D 170141183460469231731687303715884105629" -gdb_test "print -x" " =3D -170141183460469231731687303715884105727" -gdb_test "print +x" " =3D 170141183460469231731687303715884105727" +gdb_test "print x - 99 + 1" " =3D [expr $max - 99 + 1]" +gdb_test "print -x" " =3D -$max" +gdb_test "print +x" " =3D $max" gdb_test "print 170141183460469231731687303715884105727" \ " =3D 170141183460469231731687303715884105727" -gdb_test "print x =3D 170141183460469231731687303715884105727" \ +gdb_test "print x =3D $max" \ " =3D true" ... --=20 You are receiving this mail because: You are on the CC list for the bug.=