--- a/testsuite/gdb.trace/actions.exp
+++ b/testsuite/gdb.trace/actions.exp
@@ -248,6 +248,8 @@ gdb_trace_setactions "set actions for fi
     "collect \$regs" "^$" \
     "end" ""
 
+gdb_test_no_output "set default-collect \$regs"
+
 # Check the definition of tracepoints.  These tracepoints may have
 # different number in different runs.
 
@@ -256,6 +258,8 @@ proc check_tracepoint { data_source } {
 	global gdb_prompt
 	global srcfile
 
+	gdb_test "show default-collect" "The list of expressions to collect by default is \"\\\$regs\".*"
+
 	set tp_on_gdb_c_test 0
 	set tp_on_gdb_asm_test 0
 	set tp_on_gdb_recursion_test 0
--- a/testsuite/gdb.trace/disconnected-tracing.exp
+++ b/testsuite/gdb.trace/disconnected-tracing.exp
@@ -65,6 +65,8 @@ proc disconnected_tracing {  } {
 	    "collect foo" "^$"
 	gdb_test "break end" "Breakpoint ${decimal} at .*"
 
+	gdb_test_no_output "set default-collect \$regs"
+
 	gdb_test_no_output "tstart"
 
 	gdb_test "continue" "Continuing\\.\[ \r\n\]+Breakpoint.*"
@@ -73,6 +75,8 @@ proc disconnected_tracing {  } {
 	gdb_test "info tracepoints" ".*in start at.*" \
 	    "first info tracepoints"
 
+	gdb_test_no_output "set default-collect"
+
 	gdb_test "disconnect" "Ending remote debugging\\." "first disconnect"
 	if { [gdb_reconnect] == 0 } {
 	    pass "first reconnect after unload"
@@ -83,6 +87,8 @@ proc disconnected_tracing {  } {
 	gdb_test "info tracepoints" ".*in start at.*" \
 	    "second info tracepoints"
 
+	gdb_test "show default-collect" "The list of expressions to collect by default is \"\\\$regs\".*"
+
 	delete_breakpoints
 	gdb_test "info tracepoints" ".*No tracepoints..*" \
 	    "third info tracepoints"