aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.gdbtk/console.exp
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/testsuite/gdb.gdbtk/console.exp')
-rw-r--r--gdb/testsuite/gdb.gdbtk/console.exp45
1 files changed, 0 insertions, 45 deletions
diff --git a/gdb/testsuite/gdb.gdbtk/console.exp b/gdb/testsuite/gdb.gdbtk/console.exp
deleted file mode 100644
index a3857fd..0000000
--- a/gdb/testsuite/gdb.gdbtk/console.exp
+++ /dev/null
@@ -1,45 +0,0 @@
-if {$tracelevel} {
- strace $tracelevel
-}
-
-#
-# test console window
-#
-set prms_id 0
-set bug_id 0
-
-set testfile "simple"
-set srcfile ${testfile}.c
-set binfile ${objdir}/${subdir}/${testfile}
-set r [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}]
-if { $r != "" } {
- gdb_suppress_entire_file \
- "Testcase compile failed, so some tests in this file will automatically fail."
-}
-
-# Start with a fresh gdbtk
-gdb_exit
-set results [gdbtk_start [file join $srcdir $subdir console.test]]
-set results [split $results \n]
-
-# Analyze results
-foreach test $results {
- set status [lindex $test 0]
- set name [lindex $test 1]
- set description [lindex $test 2]
- set msg [lindex $test 3]
-
- switch $status {
- pass {
- pass "$description ($name)"
- }
-
- fail {
- fail "$description ($name)"
- }
-
- error {
- # We should do something with this...
- }
- }
-} \ No newline at end of file