gdb_test "break $linespec" [string_to_regexp \
[eval format \$error_messages($msg_id) \
- $args]]
+ $args]] \
+ "'break $linespec'"
}
# Some commonly used whitespace tests around ':'.
test_break "main:here${x}" unexpected "end of input"
}
- foreach x {"3" "+100" "-100" "foo"} {
+ foreach_with_prefix x {"3" "+100" "-100" "foo"} {
test_break "main 3" invalid_function "main 3"
test_break "-function \"main $x\"" invalid_function "main $x"
if {$x == "foo"} {