From c7e0511ae4fba9906b8650a503bee8d3da940dcb Mon Sep 17 00:00:00 2001 From: Stephan Rohr Date: Thu, 22 Feb 2024 03:14:29 -0800 Subject: gdb, testsuite: fix TCL error in 'gdb.base/structs.exp' A failure of 'runto_main' in 'start_structs_test' results in a TCL error. The return value of 'start_structs_test' function is evaluated inside an if conditional clause, which expects a boolean value. Return '-1' on failure to avoid the error. Reviewed-By: Keith Seitz Approved-By: Tom Tromey --- gdb/testsuite/gdb.base/structs.exp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'gdb') diff --git a/gdb/testsuite/gdb.base/structs.exp b/gdb/testsuite/gdb.base/structs.exp index ab68da2..99b6aa9 100644 --- a/gdb/testsuite/gdb.base/structs.exp +++ b/gdb/testsuite/gdb.base/structs.exp @@ -68,7 +68,7 @@ proc start_structs_test { types } { # Advance to main if {![runto_main]} { - return + return -1 } # Get the debug format -- cgit v1.1