diff options
| author | Kevin Buettner <kevinb@redhat.com> | 2003-04-16 20:29:42 +0000 |
|---|---|---|
| committer | Kevin Buettner <kevinb@redhat.com> | 2003-04-16 20:29:42 +0000 |
| commit | c8c4d8dcfb13da53404d9c599d74f96405682734 (patch) | |
| tree | f5cd3be18469885f56324b60f4249f737afe32b4 /gdb | |
| parent | 3fe60e3c145385bb5668ee7366fc9da6216a1ce5 (diff) | |
| download | gdb-c8c4d8dcfb13da53404d9c599d74f96405682734.zip gdb-c8c4d8dcfb13da53404d9c599d74f96405682734.tar.gz gdb-c8c4d8dcfb13da53404d9c599d74f96405682734.tar.bz2 | |
* gdb.base/args.exp: Invoke gdb_load for simulator targets.
Diffstat (limited to 'gdb')
| -rw-r--r-- | gdb/testsuite/ChangeLog | 4 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.base/args.exp | 12 |
2 files changed, 16 insertions, 0 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index c2c9879..7ace150 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2003-04-16 Kevin Buettner <kevinb@redhat.com> + + * gdb.base/args.exp: Invoke gdb_load for simulator targets. + 2003-04-16 Elena Zannoni <ezannoni@redhat.com> * gdb.base/completion.exp: Make 'info func mark' complete on 'info diff --git a/gdb/testsuite/gdb.base/args.exp b/gdb/testsuite/gdb.base/args.exp index e481ecb..4f50ef0 100644 --- a/gdb/testsuite/gdb.base/args.exp +++ b/gdb/testsuite/gdb.base/args.exp @@ -31,6 +31,15 @@ if [target_info exists noargs] { return; } +# No loading needs to be done when the target is `exec'. Some targets +# require that the program be loaded, however. +proc args_load {} { + global binfile + if [target_info exists is_simulator] { + gdb_load ${binfile} + } +} + set testfile "args" set srcfile ${testfile}.c set binfile ${objdir}/${subdir}/${testfile} @@ -47,6 +56,7 @@ set GDBFLAGS "--args $binfile 1 3" gdb_exit gdb_start gdb_reinitialize_dir $srcdir/$subdir +args_load gdb_test "run" \ "Starting program.*args(\\.exe)? 1 3.*3\r\n.*args\r\n1\r\n3.*Program exited normally." \ "correct args printed" @@ -58,6 +68,7 @@ set GDBFLAGS "--args $binfile 1 '' 3" gdb_exit gdb_start gdb_reinitialize_dir $srcdir/$subdir +args_load gdb_test "run" \ "Starting program.*args(\\.exe)? 1 \\\\'\\\\' 3.*4\r\n.*args\r\n1\r\n''\r\n3.*Program exited normally." \ "correct args printed, one empty" @@ -69,6 +80,7 @@ set GDBFLAGS "--args $binfile 1 '' '' 3" gdb_exit gdb_start gdb_reinitialize_dir $srcdir/$subdir +args_load gdb_test "run" \ "Starting program.*args(\\.exe)? 1 \\\\'\\\\' \\\\'\\\\' 3.*5\r\n.*args\r\n1\r\n''\r\n''\r\n3.*Program exited normally." \ "correct args printed, two empty" |