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

Diff of /dejagnu/config/i960.exp

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

revision 1.5 by bje, Thu Aug 7 03:58:36 2003 UTC revision 1.6 by bje, Sun Aug 17 23:00:07 2003 UTC
# Line 4  Line 4 
4  # it under the terms of the GNU General Public License as published by  # it under the terms of the GNU General Public License as published by
5  # the Free Software Foundation; either version 2 of the License, or  # the Free Software Foundation; either version 2 of the License, or
6  # (at your option) any later version.  # (at your option) any later version.
7  #  #
8  # This program is distributed in the hope that it will be useful,  # This program is distributed in the hope that it will be useful,
9  # but WITHOUT ANY WARRANTY; without even the implied warranty of  # but WITHOUT ANY WARRANTY; without even the implied warranty of
10  # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the  # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
11  # GNU General Public License for more details.  # GNU General Public License for more details.
12  #  #
13  # You should have received a copy of the GNU General Public License  # You should have received a copy of the GNU General Public License
14  # along with this program; if not, write to the Free Software  # along with this program; if not, write to the Free Software
15  # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.    # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
16    
17  # Please email any bugs, comments, and/or additions to this file to:  # Please email any bugs, comments, and/or additions to this file to:
18  # bug-dejagnu@gnu.org  # bug-dejagnu@gnu.org
# Line 81  proc i960_ld { dest prog } { Line 81  proc i960_ld { dest prog } {
81      remote_binary $dest      remote_binary $dest
82      remote_send $dest "\n"      remote_send $dest "\n"
83      remote_expect $dest 5 {      remote_expect $dest 5 {
84          -re $shell_prompt { }          -re $shell_prompt { }
85      }      }
86      remote_send $dest "do\n"      remote_send $dest "do\n"
87      remote_expect $dest 5 {      remote_expect $dest 5 {
# Line 117  proc i960_ld { dest prog } { Line 117  proc i960_ld { dest prog } {
117      set result 1      set result 1
118      remote_send $dest "\n"      remote_send $dest "\n"
119      remote_expect $dest 1 {      remote_expect $dest 1 {
120          -re "$shell_prompt" {          -re "$shell_prompt" {
121              set result 0              set result 0
122              exp_continue              exp_continue
123          }          }
# Line 160  proc i960_wait { dest timeout } { Line 160  proc i960_wait { dest timeout } {
160              set status $expect_out(3,string)              set status $expect_out(3,string)
161              exp_continue              exp_continue
162          }          }
163          -re "(.*)$shell_prompt" {          -re "(.*)$shell_prompt" {
164              append output $expect_out(1,string)              append output $expect_out(1,string)
165              set bstatus [check_for_board_status output]              set bstatus [check_for_board_status output]
166              if { $bstatus >= 0 } {              if { $bstatus >= 0 } {
167                  set status $bstatus                  set status $bstatus
168              }              }
169          }          }
170          -re "\[\r\n\]+" {          -re "\[\r\n\]+" {
171              # Sometimes the board goes wacky in the head, and we have              # Sometimes the board goes wacky in the head, and we have
172              # to shoot it.              # to shoot it.
173              append output $expect_out(buffer)              append output $expect_out(buffer)

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

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