testsuite/gdb.dwarf2: Enable dw2-error.exp tests for arm targets

Message ID CANW4E-0OaKChjs7KswbgE6Nfyuwi41Gjvse3ccC6xaGOgKa2FQ@mail.gmail.com
State Superseded
Headers show

Commit Message

Omair Javaid Oct. 1, 2013, 9:47 a.m.
On 28 September 2013 00:56, Tom Tromey <tromey@redhat.com> wrote:
>>>>>> "Omair" == Omair Javaid <omair.javaid@linaro.org> writes:
>
> Omair> +    cu 0 153 8 {
>
> "proc cu" was changed to take option-value pairs.
> This is the old form, it won't do the right thing on trunk.
>
> Tom

I have updated cu definition and tested it with trunk. New patch is
posted below:

---
 gdb/testsuite/gdb.dwarf2/dw2-error.S   |  160 --------------------------------
 gdb/testsuite/gdb.dwarf2/dw2-error.exp |   27 +++++-
 2 files changed, 23 insertions(+), 164 deletions(-)
 delete mode 100644 gdb/testsuite/gdb.dwarf2/dw2-error.S

--

Comments

Abid, Hafiz Oct. 1, 2013, 10:05 a.m. | #1
> +if  {[gdb_compile [list ${binfile}1.o ${binfile}2.o ] \
> +      "${binfile}" executable {}] != ""} {
> +    return -1
> +}
> +
> +clean_restart ${testfile}
> +
>  gdb_exit
>  gdb_start
>  gdb_reinitialize_dir $srcdir/$subdir

This gdb_exit, gdb_start, gdb_reinitialize_dir sequence right after clean_restart tells me that perhaps one of them is redundant.
Tom Tromey Oct. 1, 2013, 3:19 p.m. | #2
>>>>> "Omair" == Omair Javaid <omair.javaid@linaro.org> writes:

Omair> +    cu { version 153 } {
Omair> +    compile_unit {{language @DW_LANG_C}}
Omair> +    }

I think the "compile_unit" line is not properly indented.

Tom
Tom Tromey Oct. 1, 2013, 3:20 p.m. | #3
>>>>> "Abid" == Abid, Hafiz <Hafiz_Abid@mentor.com> writes:

>> +if  {[gdb_compile [list ${binfile}1.o ${binfile}2.o ] \
>> +      "${binfile}" executable {}] != ""} {
>> +    return -1
>> +}
>> +
>> +clean_restart ${testfile}
>> +
>> gdb_exit
>> gdb_start
>> gdb_reinitialize_dir $srcdir/$subdir

Abid> This gdb_exit, gdb_start, gdb_reinitialize_dir sequence right after
Abid> clean_restart tells me that perhaps one of them is redundant.

Good catch.
Given the rest of the test I think the clean_restart is not needed.

Tom

Patch

diff --git a/gdb/testsuite/gdb.dwarf2/dw2-error.S
b/gdb/testsuite/gdb.dwarf2/dw2-error.S
deleted file mode 100644
index 597753e..0000000
--- a/gdb/testsuite/gdb.dwarf2/dw2-error.S
+++ /dev/null
@@ -1,160 +0,0 @@ 
-/* Copyright (C) 2012-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
-   the Free Software Foundation; either version 3 of the License, or
-   (at your option) any later version.
-
-   This program 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 this program.  If not, see <http://www.gnu.org/licenses/>.
-
-   This was created using gcc -g -dA dw2-error.c, then hand-editing
-   it to change the DWARF version.
-
-  */
-
- .file "dw2-error.c"
- .text
-.Ltext0:
- .globl main
- .type main, @function
-main:
-.LFB0:
- .file 1 "dw2-error.c"
- # dw2-error.c:19
- .loc 1 19 0
- .cfi_startproc
- # basic block 2
- pushq %rbp
- .cfi_def_cfa_offset 16
- .cfi_offset 6, -16
- movq %rsp, %rbp
- .cfi_def_cfa_register 6
- # dw2-error.c:20
- .loc 1 20 0
- movl $23, %eax
- # dw2-error.c:21
- .loc 1 21 0
- popq %rbp
- .cfi_def_cfa 7, 8
- ret
- .cfi_endproc
-.LFE0:
- .size main, .-main
-.Letext0:
- .section .debug_info,"",@progbits
-.Ldebug_info0:
- .long 0x4e # Length of Compilation Unit Info
- .value 0x99 # DWARF version number
- .long .Ldebug_abbrev0 # Offset Into Abbrev. Section
- .byte 0x8 # Pointer Size (in bytes)
- .uleb128 0x1 # (DIE (0xb) DW_TAG_compile_unit)
- .long .LASF0 # DW_AT_producer: "GNU C 4.6.3 20120306 (Red Hat
4.6.3-2) -mtune=generic -march=x86-64 -g"
- .byte 0x1 # DW_AT_language
- .long .LASF1 # DW_AT_name: "dw2-error.c"
- .long .LASF2 # DW_AT_comp_dir: "/tmp"
- .quad .Ltext0 # DW_AT_low_pc
- .quad .Letext0 # DW_AT_high_pc
- .long .Ldebug_line0 # DW_AT_stmt_list
- .uleb128 0x2 # (DIE (0x2d) DW_TAG_subprogram)
- # DW_AT_external
- .long .LASF3 # DW_AT_name: "main"
- .byte 0x1 # DW_AT_decl_file (dw2-error.c)
- .byte 0x12 # DW_AT_decl_line
- .long 0x4a # DW_AT_type
- .quad .LFB0 # DW_AT_low_pc
- .quad .LFE0 # DW_AT_high_pc
- .uleb128 0x1 # DW_AT_frame_base
- .byte 0x9c # DW_OP_call_frame_cfa
- # DW_AT_GNU_all_call_sites
- .uleb128 0x3 # (DIE (0x4a) DW_TAG_base_type)
- .byte 0x4 # DW_AT_byte_size
- .byte 0x5 # DW_AT_encoding
- .ascii "int\0" # DW_AT_name
- .byte 0 # end of children of DIE 0xb
- .section .debug_abbrev,"",@progbits
-.Ldebug_abbrev0:
- .uleb128 0x1 # (abbrev code)
- .uleb128 0x11 # (TAG: DW_TAG_compile_unit)
- .byte 0x1 # DW_children_yes
- .uleb128 0x25 # (DW_AT_producer)
- .uleb128 0xe # (DW_FORM_strp)
- .uleb128 0x13 # (DW_AT_language)
- .uleb128 0xb # (DW_FORM_data1)
- .uleb128 0x3 # (DW_AT_name)
- .uleb128 0xe # (DW_FORM_strp)
- .uleb128 0x1b # (DW_AT_comp_dir)
- .uleb128 0xe # (DW_FORM_strp)
- .uleb128 0x11 # (DW_AT_low_pc)
- .uleb128 0x1 # (DW_FORM_addr)
- .uleb128 0x12 # (DW_AT_high_pc)
- .uleb128 0x1 # (DW_FORM_addr)
- .uleb128 0x10 # (DW_AT_stmt_list)
- .uleb128 0x17 # (DW_FORM_sec_offset)
- .byte 0
- .byte 0
- .uleb128 0x2 # (abbrev code)
- .uleb128 0x2e # (TAG: DW_TAG_subprogram)
- .byte 0 # DW_children_no
- .uleb128 0x3f # (DW_AT_external)
- .uleb128 0x19 # (DW_FORM_flag_present)
- .uleb128 0x3 # (DW_AT_name)
- .uleb128 0xe # (DW_FORM_strp)
- .uleb128 0x3a # (DW_AT_decl_file)
- .uleb128 0xb # (DW_FORM_data1)
- .uleb128 0x3b # (DW_AT_decl_line)
- .uleb128 0xb # (DW_FORM_data1)
- .uleb128 0x49 # (DW_AT_type)
- .uleb128 0x13 # (DW_FORM_ref4)
- .uleb128 0x11 # (DW_AT_low_pc)
- .uleb128 0x1 # (DW_FORM_addr)
- .uleb128 0x12 # (DW_AT_high_pc)
- .uleb128 0x1 # (DW_FORM_addr)
- .uleb128 0x40 # (DW_AT_frame_base)
- .uleb128 0x18 # (DW_FORM_exprloc)
- .uleb128 0x2117 # (DW_AT_GNU_all_call_sites)
- .uleb128 0x19 # (DW_FORM_flag_present)
- .byte 0
- .byte 0
- .uleb128 0x3 # (abbrev code)
- .uleb128 0x24 # (TAG: DW_TAG_base_type)
- .byte 0 # DW_children_no
- .uleb128 0xb # (DW_AT_byte_size)
- .uleb128 0xb # (DW_FORM_data1)
- .uleb128 0x3e # (DW_AT_encoding)
- .uleb128 0xb # (DW_FORM_data1)
- .uleb128 0x3 # (DW_AT_name)
- .uleb128 0x8 # (DW_FORM_string)
- .byte 0
- .byte 0
- .byte 0
- .section .debug_aranges,"",@progbits
- .long 0x2c # Length of Address Ranges Info
- .value 0x2 # DWARF Version
- .long .Ldebug_info0 # Offset of Compilation Unit Info
- .byte 0x8 # Size of Address
- .byte 0 # Size of Segment Descriptor
- .value 0 # Pad to 16 byte boundary
- .value 0
- .quad .Ltext0 # Address
- .quad .Letext0-.Ltext0 # Length
- .quad 0
- .quad 0
- .section .debug_line,"",@progbits
-.Ldebug_line0:
- .section .debug_str,"MS",@progbits,1
-.LASF0:
- .string "GNU C 4.6.3 20120306 (Red Hat 4.6.3-2) -mtune=generic
-march=x86-64 -g"
-.LASF2:
- .string "/tmp"
-.LASF3:
- .string "main"
-.LASF1:
- .string "dw2-error.c"
- .ident "GCC: (GNU) 4.6.3 20120306 (Red Hat 4.6.3-2)"
- .section .note.GNU-stack,"",@progbits
diff --git a/gdb/testsuite/gdb.dwarf2/dw2-error.exp
b/gdb/testsuite/gdb.dwarf2/dw2-error.exp
index d0baeea..a23aa33 100644
--- a/gdb/testsuite/gdb.dwarf2/dw2-error.exp
+++ b/gdb/testsuite/gdb.dwarf2/dw2-error.exp
@@ -20,14 +20,33 @@  if {![dwarf2_support]} {
     return 0
 }

-standard_testfile .S
+standard_testfile .c dw2-error.S

-# We can't use prepare_for_testing here because we need to check the
-# 'file' command's output.
-if {[build_executable $testfile.exp $testfile $srcfile {nodebug}]} {
+# Make some DWARF for the test.
+set asm_file [standard_output_file $srcfile2]
+Dwarf::assemble $asm_file {
+
+    cu { version 153 } {
+    compile_unit {{language @DW_LANG_C}}
+    }
+}
+
+if  {[gdb_compile ${srcdir}/${subdir}/${srcfile} ${binfile}1.o \
+      object {nodebug}] != ""} {
+    return -1
+}
+
+if  {[gdb_compile $asm_file ${binfile}2.o object {nodebug}] != ""} {
     return -1
 }

+if  {[gdb_compile [list ${binfile}1.o ${binfile}2.o ] \
+      "${binfile}" executable {}] != ""} {
+    return -1
+}
+
+clean_restart ${testfile}
+
 gdb_exit
 gdb_start
 gdb_reinitialize_dir $srcdir/$subdir