diff options
| author | Michael Snyder <msnyder@specifix.com> | 2002-03-23 00:03:01 +0000 |
|---|---|---|
| committer | Michael Snyder <msnyder@specifix.com> | 2002-03-23 00:03:01 +0000 |
| commit | 9da4230c9149c15444ccf500d0294b52c6ca1db5 (patch) | |
| tree | 7babf455035d8f10797fc07f29fbeae4366c8f82 /gdb/testsuite/gdb.base/help.exp | |
| parent | 1feab643b68e062d7d92d0343b0514b269aa5b61 (diff) | |
| download | gdb-9da4230c9149c15444ccf500d0294b52c6ca1db5.tar.gz | |
2002-03-22 Michael Snyder <msnyder@redhat.com>
* gdb.base/default.exp: Add test for gcore.
* gdb.base/help.exp: Add test for gcore.
Diffstat (limited to 'gdb/testsuite/gdb.base/help.exp')
| -rw-r--r-- | gdb/testsuite/gdb.base/help.exp | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.base/help.exp b/gdb/testsuite/gdb.base/help.exp index a09f8da69ad..49f6ed8f7c5 100644 --- a/gdb/testsuite/gdb.base/help.exp +++ b/gdb/testsuite/gdb.base/help.exp @@ -149,6 +149,27 @@ gdb_test "help files" "Specifying.*" "help files" gdb_test "help finish" "Execute until selected stack frame returns..*\[\r\n\]+Upon return, the value returned is printed and put in the value history." "help finish" # test help forward-search gdb_test "help forward-search" "Search for regular expression .see regex.3.. from last line listed..*" "help forward-search" +# test help gcore +send_gdb "help gcore\n" +gdb_expect { + -re "Undefined command: \"gcore\". Try \"help\".*$gdb_prompt $" { + pass "help gcore" + } + -re "Save a core file with the current state of the debugged process.\[\r\n\]+Argument is optional filename. Default filename is 'core.<process_id>'.*$gdb_prompt $" { + pass "help gcore" + } + default { fail "help gcore" } +} +send_gdb "help generate-core-file\n" +gdb_expect { + -re "Undefined command: \"generate-core-file\". Try \"help\".*$gdb_prompt $" { + pass "help gcore" + } + -re "Save a core file with the current state of the debugged process.\[\r\n\]+Argument is optional filename. Default filename is 'core.<process_id>'.*$gdb_prompt $" { + pass "help gcore" + } + default { fail "help gcore" } +} # test help help "h" abbreviation gdb_test "help h" "Print list of commands." "help help \"h\" abbreviation" # test help help |