mirror of
https://github.com/espressif/binutils-gdb.git
synced 2025-09-13 18:34:49 +08:00
Test indented comment in file being sourced.
* gdb.base/commands.exp: Test indented comment in file being sourced.
This commit is contained in:
@ -1,3 +1,8 @@
|
|||||||
|
2010-01-01 Joel Brobecker <brobecker@adacore.com>
|
||||||
|
|
||||||
|
Test indented comment in file being sourced.
|
||||||
|
* gdb.base/commands.exp: Test indented comment in file being sourced.
|
||||||
|
|
||||||
2010-01-01 Joel Brobecker <brobecker@adacore.com>
|
2010-01-01 Joel Brobecker <brobecker@adacore.com>
|
||||||
|
|
||||||
* gdb.fortran/array-element.f, gdb.fortran/complex.f,
|
* gdb.fortran/array-element.f, gdb.fortran/complex.f,
|
||||||
|
@ -577,6 +577,19 @@ proc stray_arg0_test { } {
|
|||||||
"stray_arg0_test #4"
|
"stray_arg0_test #4"
|
||||||
}
|
}
|
||||||
|
|
||||||
|
# Test that GDB is able to source a file with an indented comment.
|
||||||
|
proc source_file_with_indented_comment {} {
|
||||||
|
set fd [open "file1" w]
|
||||||
|
puts $fd \
|
||||||
|
{define my_fun
|
||||||
|
#indented comment
|
||||||
|
end
|
||||||
|
echo Done!\n}
|
||||||
|
close $fd
|
||||||
|
|
||||||
|
gdb_test "source file1" "Done!" "source file with indented comment"
|
||||||
|
}
|
||||||
|
|
||||||
# Test that GDB can handle arguments when sourcing files recursively.
|
# Test that GDB can handle arguments when sourcing files recursively.
|
||||||
# If the arguments are overwritten with ####### then the test has failed.
|
# If the arguments are overwritten with ####### then the test has failed.
|
||||||
proc recursive_source_test {} {
|
proc recursive_source_test {} {
|
||||||
@ -761,6 +774,7 @@ deprecated_command_test
|
|||||||
bp_deleted_in_command_test
|
bp_deleted_in_command_test
|
||||||
temporary_breakpoint_commands
|
temporary_breakpoint_commands
|
||||||
stray_arg0_test
|
stray_arg0_test
|
||||||
|
source_file_with_indented_comment
|
||||||
recursive_source_test
|
recursive_source_test
|
||||||
if_commands_test
|
if_commands_test
|
||||||
redefine_hook_test
|
redefine_hook_test
|
||||||
|
Reference in New Issue
Block a user