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

Diff of /dejagnu/config/vxworks.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 69  proc ${board}_init { dest } { Line 69  proc ${board}_init { dest } {
69      remote_send $dest "\n\n"      remote_send $dest "\n\n"
70      remote_expect $dest 3 {      remote_expect $dest 3 {
71          timeout {}          timeout {}
72          -re ".+" { exp_continue; }          -re ".+" { exp_continue }
73      }      }
74      remote_send $dest "p\n"      remote_send $dest "p\n"
75      remote_expect $dest 20 {      remote_expect $dest 20 {
# Line 286  proc vxworks_ld { dest prog } { Line 286  proc vxworks_ld { dest prog } {
286      # If the load fails we want `expect_out' stored in the log and this      # If the load fails we want `expect_out' stored in the log and this
287      # saves duplicating that code.      # saves duplicating that code.
288    
289      for { set x 0 ; } { $x < 3 } {incr x; } {      for { set x 0 } { $x < 3 } { incr x } {
290          remote_send $dest "\n"          remote_send $dest "\n"
291          remote_expect $dest 30 {          remote_expect $dest 30 {
292              -re ".*$shell_prompt $" { set x 20; }              -re ".*$shell_prompt $" { set x 20 }
293              -re "\\\[VxWorks Boot\\\]:" {              -re "\\\[VxWorks Boot\\\]:" {
294                  remote_send $dest "@\n"                  remote_send $dest "@\n"
295                  sleep 20                  sleep 20
296                  exp_continue                  exp_continue
297              }              }
298              timeout { return -1; }              timeout { return -1 }
299          }          }
300      }      }
301    
# Line 462  proc vxworks_load {dest prog args} { Line 462  proc vxworks_load {dest prog args} {
462          set outp ""          set outp ""
463      }      }
464    
465      for { set x 0; } { $x < 3 } { incr x } {      for { set x 0 } { $x < 3 } { incr x } {
466          set status [vxworks_ld $dest $prog]          set status [vxworks_ld $dest $prog]
467          if { $status >= 0 } {          if { $status >= 0 } {
468              if { $status > 0 } {              if { $status > 0 } {

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