From d095eb4e877edb901e56546e29ac24da0bec346b Mon Sep 17 00:00:00 2001 From: Pedro Alves Date: Wed, 13 Apr 2022 10:10:28 +0100 Subject: [PATCH] Tidy gdb.base/parse_number.exp Now that Ada is able to parse & print 0xffffffffffffffff (2^64-1) in hex, move it to the else branch like most other languages. Change-Id: Ib305f6bb2b6b230a1190ea783b245b865821094c --- gdb/testsuite/gdb.base/parse_number.exp | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/gdb/testsuite/gdb.base/parse_number.exp b/gdb/testsuite/gdb.base/parse_number.exp index dc6d358ca48..e911cc0fdfb 100644 --- a/gdb/testsuite/gdb.base/parse_number.exp +++ b/gdb/testsuite/gdb.base/parse_number.exp @@ -27,10 +27,7 @@ proc test_parse_numbers {} { gdb_test_no_output "set language $lang" set val "0xffffffffffffffff" - if {$lang == "ada"} { - gdb_test "p/x $val" " = 0xffffffffffffffff" - gdb_test "ptype $val" " = <8-byte integer>" - } elseif {$lang == "fortran"} { + if {$lang == "fortran"} { gdb_test "p/x $val" " = 0xffffffff" gdb_test "ptype $val" " = unsigned int" } elseif {$lang == "modula-2"} { @@ -40,7 +37,9 @@ proc test_parse_numbers {} { "expression parsing not implemented for language \"Unknown\"" } else { gdb_test "p/x $val" " = $val" - if {$lang == "d"} { + if {$lang == "ada"} { + gdb_test "ptype $val" " = <8-byte integer>" + } elseif {$lang == "d"} { gdb_test "ptype $val" " = ulong" } elseif {$lang == "rust"} { gdb_test "ptype $val" " = i64" -- 2.30.2