aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/lib/gdb-guile.exp
diff options
context:
space:
mode:
authorTom de Vries <tdevries@suse.de>2023-03-06 16:49:19 +0100
committerTom de Vries <tdevries@suse.de>2023-03-06 16:49:19 +0100
commitb50420fd058824ecc737709f49f87d622b0f3371 (patch)
treecc1f11c246023c7acb69e0257b85fcbb866d46ab /gdb/testsuite/lib/gdb-guile.exp
parentb24a386d75a769d2362e9f9261a2efb023a88a82 (diff)
downloadgdb-b50420fd058824ecc737709f49f87d622b0f3371.zip
gdb-b50420fd058824ecc737709f49f87d622b0f3371.tar.gz
gdb-b50420fd058824ecc737709f49f87d622b0f3371.tar.bz2
[gdb/testsuite] Use regular proc syntax for gdb_caching_proc
A regular tcl proc with no args looks like: ... proc foo {} { return 1 } ... but a gdb_caching_proc deviates from that syntax by dropping the explicit no args bit: ... gdb_caching_proc foo { return 1 } ... Make the gdb_caching_proc use the same syntax as regular procs, such that we have instead: ... gdb_caching_proc foo {} { return 1 } ... Tested on x86_64-linux. Reviewed-By: Tom Tromey <tom@tromey.com>
Diffstat (limited to 'gdb/testsuite/lib/gdb-guile.exp')
-rw-r--r--gdb/testsuite/lib/gdb-guile.exp2
1 files changed, 1 insertions, 1 deletions
diff --git a/gdb/testsuite/lib/gdb-guile.exp b/gdb/testsuite/lib/gdb-guile.exp
index 50189c8..3451022 100644
--- a/gdb/testsuite/lib/gdb-guile.exp
+++ b/gdb/testsuite/lib/gdb-guile.exp
@@ -20,7 +20,7 @@ set ghex {[0-9a-f]+}
# Return a 1 for configurations that support Guile scripting.
-gdb_caching_proc allow_guile_tests {
+gdb_caching_proc allow_guile_tests {} {
set output [remote_exec host $::GDB "$::INTERNAL_GDBFLAGS --configuration"]
return [expr {[string first "--with-guile" $output] != -1}]
}