GDB 7.6.50

gdb/testsuite/gdb.dwarf2/dw2-dos-drive.exp

Index: gdb/testsuite/gdb.dwarf2/dw2-dos-drive.exp
diff --git a/gdb/testsuite/gdb.dwarf2/dw2-bad-parameter-type.exp b/gdb/testsuite/gdb.dwarf2/dw2-dos-drive.exp
similarity index 67%
copy from gdb/testsuite/gdb.dwarf2/dw2-bad-parameter-type.exp
copy to gdb/testsuite/gdb.dwarf2/dw2-dos-drive.exp
index 6f8a764cfb97630f1fa6ddac910050ac13a54e75..ecfd23ad2bf898bed93f7cad3d07e4bbaaf9e0fd 100644
--- a/gdb/testsuite/gdb.dwarf2/dw2-bad-parameter-type.exp
+++ b/gdb/testsuite/gdb.dwarf2/dw2-dos-drive.exp
@@ -1,4 +1,4 @@
-# Copyright 2010-2012 Free Software Foundation, Inc.
+# Copyright 2013 Free Software Foundation, Inc.
 
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -14,7 +14,6 @@
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 load_lib dwarf.exp
 
-# This test can only be run on targets which support DWARF-2 and use gas.
 if {![dwarf2_support]} {
     return 0  
 }
@@ -22,16 +21,21 @@ if {![dwarf2_support]} {
 standard_testfile .S
 set executable ${testfile}
 
-# First try referencing DW_AT_frame_base which is not defined.
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" object {}] != "" } {
     return -1
 }
 
 clean_restart $executable
 
-# The first access (as we do not use -readnow) prints some:
-# Dwarf Error: Cannot find DIE at 0x0 referenced from DIE at 0x29 [in module ...]
-gdb_test "ptype f"
+gdb_test_no_output "set breakpoint pending off"
 
-gdb_test "ptype f"
-gdb_test "p 5" " = 5" "is alive"
+gdb_test "break 'z:file.c':func" {Breakpoint [0-9]+ at .*}
+
+set dos [expr [istarget "*-*-cygwin*"] || [istarget "i?86-*-mingw*"] \
+	      || [istarget "*-*-msdosdjgpp*"] || [istarget "*-*-go32*"] ]
+
+if { $dos } {
+    gdb_test "break file.c:func" {Breakpoint [0-9]+ at .*}
+} else {
+    unsupported "break file.c:func"
+}