/[dejagnu]/dejagnu/config/gdb_stub.exp
ViewVC logotype

Diff of /dejagnu/config/gdb_stub.exp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4 by bje, Thu Aug 7 03:42:43 2003 UTC revision 1.5 by bje, Thu Aug 7 03:58:36 2003 UTC
# Line 50  proc gdb_stub_restart { dest } { Line 50  proc gdb_stub_restart { dest } {
50    
51      gdb_stub_init $dest      gdb_stub_init $dest
52    
53      for {set x 1;} { $x < 4 } {incr x} {      for { set x 1 } { $x < 4 } {incr x} {
54          remote_close $dest          remote_close $dest
55          sleep 2          sleep 2
56          set command "$GDB -nw -nx"          set command "$GDB -nw -nx"
# Line 394  proc gdb_stub_start { dest } { Line 394  proc gdb_stub_start { dest } {
394  }  }
395    
396  proc gdb_stub_spawn { dest prog args } {  proc gdb_stub_spawn { dest prog args } {
397      for { set x 0; } { $x < 3 } { incr x } {      for { set x 0 } { $x < 3 } { incr x } {
398          if { [remote_ld $dest $prog] != 1 } {          if { [remote_ld $dest $prog] != 1 } {
399              return [list "fail" "remote_ld failed"]              return [list "fail" "remote_ld failed"]
400          }          }
# Line 475  proc gdb_stub_load { dest prog args } { Line 475  proc gdb_stub_load { dest prog args } {
475      global gdb_prompt      global gdb_prompt
476      set argnames { "command-line arguments" "input file" "output file" }      set argnames { "command-line arguments" "input file" "output file" }
477    
478      for { set x 0; } { $x < [llength $args] } { incr x } {      for { set x 0 } { $x < [llength $args] } { incr x } {
479          if { [lindex $args $x] != "" } {          if { [lindex $args $x] != "" } {
480              return [list "unsupported" "no support for [lindex $argnames $x] on this target"]              return [list "unsupported" "no support for [lindex $argnames $x] on this target"]
481          }          }

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26