[binutils-gdb] GDB: testsuite: Guile: Don't return -1 from top-level

Thiago Bauermann via Gdb-cvs <[email protected]>
Newsgroups gmane.comp.gdb.cvs
Message-ID <[email protected]>
https://sourceware.org/git/gitweb.cgi?p=binutils-gdb.git;h=aee273578c9d518088de5705ad61a70d11b90955

commit aee273578c9d518088de5705ad61a70d11b90955
Author: Thiago Jung Bauermann <[email protected]>
Date:   Wed Apr 29 20:04:12 2026 -0300

    GDB: testsuite: Guile: Don't return -1 from top-level
    
    All changes are the result of running:
    
    $ sed -i 's/^    return -1/    return/' *.exp
    
    inside gdb/testsuite/gdb.guile.
    
    Approved-By: Tom Tromey <[email protected]>

Diff:
---
 gdb/testsuite/gdb.guile/scm-block.exp      | 2 +-
 gdb/testsuite/gdb.guile/scm-breakpoint.exp | 2 +-
 gdb/testsuite/gdb.guile/scm-frame.exp      | 2 +-
 gdb/testsuite/gdb.guile/scm-iterator.exp   | 2 +-
 gdb/testsuite/gdb.guile/scm-progspace.exp  | 2 +-
 gdb/testsuite/gdb.guile/scm-symbol.exp     | 4 ++--
 gdb/testsuite/gdb.guile/types-module.exp   | 2 +-
 7 files changed, 8 insertions(+), 8 deletions(-)

diff --git a/gdb/testsuite/gdb.guile/scm-block.exp b/gdb/testsuite/gdb.guile/scm-block.exp
index 8027dc0ce19..c5e2fd4403b 100644
--- a/gdb/testsuite/gdb.guile/scm-block.exp
+++ b/gdb/testsuite/gdb.guile/scm-block.exp
@@ -23,7 +23,7 @@ require allow_guile_tests
 standard_testfile
 
 if { [prepare_for_testing "failed to prepare" ${testfile} ${srcfile}] } {
-    return -1
+    return
 }
 
 if {![gdb_guile_runto_main]} {
diff --git a/gdb/testsuite/gdb.guile/scm-breakpoint.exp b/gdb/testsuite/gdb.guile/scm-breakpoint.exp
index 68744bb87f7..60764a986c1 100644
--- a/gdb/testsuite/gdb.guile/scm-breakpoint.exp
+++ b/gdb/testsuite/gdb.guile/scm-breakpoint.exp
@@ -23,7 +23,7 @@ require allow_guile_tests
 standard_testfile
 
 if { [prepare_for_testing "failed to prepare" ${testfile} ${srcfile}] } {
-    return -1
+    return
 }
 
 proc_with_prefix test_bkpt_basic { } {
diff --git a/gdb/testsuite/gdb.guile/scm-frame.exp b/gdb/testsuite/gdb.guile/scm-frame.exp
index 8c86b7a8249..7db24f6e4e9 100644
--- a/gdb/testsuite/gdb.guile/scm-frame.exp
+++ b/gdb/testsuite/gdb.guile/scm-frame.exp
@@ -23,7 +23,7 @@ require allow_guile_tests
 standard_testfile
 
 if { [prepare_for_testing "failed to prepare" ${testfile} ${srcfile}] } {
-    return -1
+    return
 }
 
 # The following tests require execution.
diff --git a/gdb/testsuite/gdb.guile/scm-iterator.exp b/gdb/testsuite/gdb.guile/scm-iterator.exp
index 6907ec2d869..cdbaf20d699 100644
--- a/gdb/testsuite/gdb.guile/scm-iterator.exp
+++ b/gdb/testsuite/gdb.guile/scm-iterator.exp
@@ -23,7 +23,7 @@ require allow_guile_tests
 standard_testfile
 
 if { [prepare_for_testing "failed to prepare" ${testfile} ${srcfile}] } {
-    return -1
+    return
 }
 
 if {![gdb_guile_runto_main]} {
diff --git a/gdb/testsuite/gdb.guile/scm-progspace.exp b/gdb/testsuite/gdb.guile/scm-progspace.exp
index 306d08769e8..3b73ecb8233 100644
--- a/gdb/testsuite/gdb.guile/scm-progspace.exp
+++ b/gdb/testsuite/gdb.guile/scm-progspace.exp
@@ -23,7 +23,7 @@ require allow_guile_tests
 standard_testfile
 
 if {[build_executable $testfile.exp $testfile $srcfile debug] == -1} {
-    return -1
+    return
 }
 
 clean_restart
diff --git a/gdb/testsuite/gdb.guile/scm-symbol.exp b/gdb/testsuite/gdb.guile/scm-symbol.exp
index bed817edcc0..6cd1199e9b2 100644
--- a/gdb/testsuite/gdb.guile/scm-symbol.exp
+++ b/gdb/testsuite/gdb.guile/scm-symbol.exp
@@ -23,7 +23,7 @@ require allow_guile_tests
 standard_testfile
 
 if {[prepare_for_testing "failed to prepare" $testfile $srcfile debug]} {
-    return -1
+    return
 }
 
 # These tests are done before we call gdb_guile_runto_main so we have to
@@ -138,7 +138,7 @@ gdb_test "guile (print (symbol-symtab t))" "= #<gdb:symtab (.*/)?scm-symbol.c>"
 # Recompile binary.
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}-cxx" executable "debug c++"] != "" } {
     untested "failed to compile in C++ mode"
-    return -1
+    return
 }
 
 clean_restart ${::testfile}-cxx
diff --git a/gdb/testsuite/gdb.guile/types-module.exp b/gdb/testsuite/gdb.guile/types-module.exp
index 9693d4b3655..b48a24742eb 100644
--- a/gdb/testsuite/gdb.guile/types-module.exp
+++ b/gdb/testsuite/gdb.guile/types-module.exp
@@ -27,7 +27,7 @@ lappend flags debug
 lappend flags c++
 
 if { [prepare_for_testing "failed to prepare" ${testfile} ${srcfile} $flags] } {
-    return -1
+    return
 }
 
 if {![gdb_guile_runto_main]} {
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.