1 files changed, 0 insertions, 100 deletions
diff --git a/config/tic80.exp b/config/tic80.exp
deleted file mode 100644
index d9e37d0..0000000
--- a/config/tic80.exp
+++ /dev/null
@@ -1,100 +0,0 @@
-# Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001
-# 2002, 2003, 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
-#
-# This file is part of DejaGnu.
-#
-# DejaGnu is free software; you can redistribute it and/or modify it
-# under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 3 of the License, or
-# (at your option) any later version.
-#
-# DejaGnu is distributed in the hope that it will be useful, but
-# WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-# General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with DejaGnu; if not, write to the Free Software Foundation,
-# Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.
-
-#
-# Nasty ugly stuff.
-#
-# We have to maintain two connections to the DOS box where the board
-# is being held. One of them runs an I/O monitor process, while the other
-# is used to actually start the program under test running on the board.
-#
-
-proc tic80_load { dest prog args } {
-    set dos_box [board_info $dest dos_host]
-
-    remote_spawn $dos_box [board_info $dest io_program]
-
-    set status [remote_ld $dest $prog]
-
-    if { $status != "pass" } {
-	return $status
-    }
-
-    set result [remote_wait $dos_box 300]
-    set output [lindex $result 1]
-    if { [lindex $result 0] < 0 } {
-	if {[board_info $dos_box exists fileid]} {
-	    dos_interrupt_job $dos_box
-	} else {
-	    remote_close $dos_box
-	}
-    }
-
-    set status "fail"
-    regsub "(\\*\\*\\* EXIT code \[0-9\]+\[\r\n]+).*$" "$output" "\\1" output
-    verbose "board out is $output"
-    set bstatus [check_for_board_status output]
-    if { [lindex $result 0] >= 0 } {
-	if { $bstatus == 0 } {
-	    set status "pass"
-	}
-    }
-    remote_file build delete "a.fix"
-    return [list $status $output]
-}
-
-proc tic80_ld { dest prog } {
-    set dos_box [board_info $dest dos_host]
-    set dopush 0
-
-    if { [remote_swap_conn $dos_box] == "fail" } {
-	if { [remote_push_conn $dos_box] == "fail" } {
-	    set dopush 1
-	}
-	remote_open $dos_box
-    }
-    set prog [remote_download $dos_box $prog "a.fix"]
-
-    remote_spawn $dos_box "[board_info $dest start_program] $prog"
-    remote_expect $dos_box 10 {
-	-re "file\[(\]s\[)\] copied" {}
-    }
-    sleep 3
-    dos_interrupt_job $dos_box
-    if { $dopush } {
-	remote_push_conn $dos_box
-    } else {
-	remote_swap_conn $dos_box
-    }
-    return "pass"
-}
-#
-# Close the connection to the DOS box.
-#
-proc tic80_close { host } {
-    set dos_box [board_info $host dos_host]
-
-    return [remote_close $dos_box]
-}
-
-set_board_info protocol "tic80"
-set_board_info gdb,use_standard_load 1
-set_board_info gdb,no_push_conn 1
-set_board_info gdb,do_reload_on_run 1
-set_board_info gdb,use_breakpoint_for_stub 1