| OLD | NEW |
| 1 # Test reading debug information from in object files. | 1 # Test reading debug information from in object files. |
| 2 | 2 |
| 3 if { [skip_hp_tests] } { continue } | 3 if { [skip_hp_tests] } { continue } |
| 4 | 4 |
| 5 if { ![istarget "hppa*-*-hpux*"] } { | 5 if { ![istarget "hppa*-*-hpux*"] } { |
| 6 verbose "HPUX test ignored for non-hppa targets." | 6 verbose "HPUX test ignored for non-hppa targets." |
| 7 return 0 | 7 return 0 |
| 8 } | 8 } |
| 9 | 9 |
| 10 set testfile "test" | 10 set testfile "test" |
| 11 set srcsubdir ${srcdir}/${subdir}/objdbg01 | 11 set srcsubdir ${srcdir}/${subdir}/objdbg01 |
| 12 set toolssubdir ${srcdir}/${subdir}/tools | 12 set toolssubdir ${srcdir}/${subdir}/tools |
| 13 set objdbgdir ${objdir}/${subdir}/objdbg01 | 13 set objdbgdir ${objdir}/${subdir}/objdbg01 |
| 14 set binfile ${objdbgdir}/${testfile} | 14 set binfile ${objdbgdir}/${testfile} |
| 15 set symaddrfile ${toolssubdir}/symaddr | 15 set symaddrfile ${toolssubdir}/symaddr |
| 16 | 16 |
| 17 # Create and source the file that provides information about the compiler | 17 # Create and source the file that provides information about the compiler |
| 18 # used to compile the test case. | 18 # used to compile the test case. |
| 19 if [get_compiler_info ${binfile}] { | 19 if [get_compiler_info] { |
| 20 return -1 | 20 return -1 |
| 21 } | 21 } |
| 22 | 22 |
| 23 if {!$hp_aCC_compiler && !$hp_cc_compiler} { | 23 if {!$hp_aCC_compiler && !$hp_cc_compiler} { |
| 24 return 0 | 24 return 0 |
| 25 } | 25 } |
| 26 | 26 |
| 27 if { [gdb_compile "${toolssubdir}/test-objdbg.cc" "${objdbgdir}/test-objdbg.o" o
bject "debug c++ {additional_flags=-I${toolssubdir} +objdebug}"] != "" } { | 27 if { [gdb_compile "${toolssubdir}/test-objdbg.cc" "${objdbgdir}/test-objdbg.o" o
bject "debug c++ {additional_flags=-I${toolssubdir} +objdebug}"] != "" } { |
| 28 untested objdbg01.exp | 28 untested objdbg01.exp |
| 29 return -1 | 29 return -1 |
| (...skipping 184 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 214 gdb_reinitialize_dir ${srcsubdir} | 214 gdb_reinitialize_dir ${srcsubdir} |
| 215 gdb_load ${binfile}${filenum} | 215 gdb_load ${binfile}${filenum} |
| 216 gdb_test "ptype class Info<PP>" \ | 216 gdb_test "ptype class Info<PP>" \ |
| 217 "type = (class |)Info<PP> {..*void p( |)..*}.*" | 217 "type = (class |)Info<PP> {..*void p( |)..*}.*" |
| 218 gdb_test "ptype class Info<QQ>" \ | 218 gdb_test "ptype class Info<QQ>" \ |
| 219 "type = (class |)Info<QQ> {..*void p( |)..*}.*" | 219 "type = (class |)Info<QQ> {..*void p( |)..*}.*" |
| 220 gdb_test "ptype class Info<PP>" \ | 220 gdb_test "ptype class Info<PP>" \ |
| 221 "type = (class |)Info<PP> {..*void p( |)..*}.*" | 221 "type = (class |)Info<PP> {..*void p( |)..*}.*" |
| 222 } | 222 } |
| 223 | 223 |
| OLD | NEW |