aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.ada/big_packed_array.exp
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/testsuite/gdb.ada/big_packed_array.exp')
-rw-r--r--gdb/testsuite/gdb.ada/big_packed_array.exp4
1 files changed, 2 insertions, 2 deletions
diff --git a/gdb/testsuite/gdb.ada/big_packed_array.exp b/gdb/testsuite/gdb.ada/big_packed_array.exp
index b1566af..96ed9d2 100644
--- a/gdb/testsuite/gdb.ada/big_packed_array.exp
+++ b/gdb/testsuite/gdb.ada/big_packed_array.exp
@@ -27,7 +27,7 @@ foreach_gnat_encoding scenario flags {all minimal} {
lappend flags debug
if {[gdb_compile_ada "${srcfile}" "${binfile}-${scenario}" executable $flags] != ""} {
- return -1
+ return
}
clean_restart ${testfile}-${scenario}
@@ -38,7 +38,7 @@ foreach_gnat_encoding scenario flags {all minimal} {
gdb_test "print good" \
"= \\(false <repeats 196 times>\\)" \
- set have_xfail [expr $old_gcc && [string equal "$scenario" "minimal"]]
+ set have_xfail [expr {$old_gcc && [string equal "$scenario" "minimal"]}]
set re "= \\(false <repeats 196 times>\\)"
set re_xfail "= \\(0 => 0 <repeats 25 times>\\)"