| Index: gdb/testsuite/gdb.dwarf2/dw2-common-block.S
|
| diff --git a/gdb/testsuite/gdb.dwarf2/dw2-common-block.S b/gdb/testsuite/gdb.dwarf2/dw2-common-block.S
|
| new file mode 100644
|
| index 0000000000000000000000000000000000000000..da1a18fa3e0f8d3c95a2a1af7dda99f5f8f76014
|
| --- /dev/null
|
| +++ b/gdb/testsuite/gdb.dwarf2/dw2-common-block.S
|
| @@ -0,0 +1,872 @@
|
| +/* This testcase is part of GDB, the GNU debugger.
|
| +
|
| + Copyright 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 made from ../gdb.fortran/common-block.f90 using
|
| + gfortran -dA -S -g
|
| + and then hand-editing the assembly a bit to introduce
|
| + DW_AT_data_member_location.
|
| +
|
| + Search for "#if 0" in this file to see the important edits. */
|
| +
|
| + .file "common-block.f90"
|
| + .text
|
| +.Ltext0:
|
| + .globl in_
|
| + .type in_, @function
|
| +in_:
|
| +.LFB0:
|
| + .file 1 "../gdb.fortran/common-block.f90"
|
| + # ../gdb.fortran/common-block.f90:21
|
| + .loc 1 21 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
|
| + subq $16, %rsp
|
| + # ../gdb.fortran/common-block.f90:34
|
| + .loc 1 34 0
|
| + movl $5, -4(%rbp)
|
| + # ../gdb.fortran/common-block.f90:35
|
| + .loc 1 35 0
|
| + movl $55, -8(%rbp)
|
| + # ../gdb.fortran/common-block.f90:21
|
| + .loc 1 21 0
|
| + movl fo_o_(%rip), %eax
|
| + # ../gdb.fortran/common-block.f90:37
|
| + .loc 1 37 0
|
| + cmpl $11, %eax
|
| + jne .L2
|
| + # basic block 3
|
| + # ../gdb.fortran/common-block.f90:21
|
| + .loc 1 21 0 discriminator 2
|
| + movss fo_o_+4(%rip), %xmm0
|
| + # ../gdb.fortran/common-block.f90:37
|
| + .loc 1 37 0 discriminator 2
|
| + ucomiss .LC0(%rip), %xmm0
|
| + jp .L2
|
| + # basic block 4
|
| + ucomiss .LC0(%rip), %xmm0
|
| + jne .L2
|
| + # basic block 5
|
| + # ../gdb.fortran/common-block.f90:21
|
| + .loc 1 21 0 discriminator 3
|
| + movsd fo_o_+8(%rip), %xmm0
|
| + # ../gdb.fortran/common-block.f90:37
|
| + .loc 1 37 0 discriminator 3
|
| + ucomisd .LC1(%rip), %xmm0
|
| + jp .L2
|
| + # basic block 6
|
| + ucomisd .LC1(%rip), %xmm0
|
| + je .L8
|
| +.L2:
|
| + # basic block 7
|
| + # ../gdb.fortran/common-block.f90:37
|
| + .loc 1 37 0 is_stmt 0 discriminator 1
|
| + movl $0, %eax
|
| + call _gfortran_abort
|
| +.L8:
|
| + # basic block 8
|
| + # ../gdb.fortran/common-block.f90:21
|
| + .loc 1 21 0 is_stmt 1
|
| + movl foo_(%rip), %eax
|
| + # ../gdb.fortran/common-block.f90:38
|
| + .loc 1 38 0
|
| + cmpl $1, %eax
|
| + jne .L5
|
| + # basic block 9
|
| + # ../gdb.fortran/common-block.f90:21
|
| + .loc 1 21 0 discriminator 2
|
| + movss foo_+4(%rip), %xmm0
|
| + # ../gdb.fortran/common-block.f90:38
|
| + .loc 1 38 0 discriminator 2
|
| + ucomiss .LC2(%rip), %xmm0
|
| + jp .L5
|
| + # basic block 10
|
| + ucomiss .LC2(%rip), %xmm0
|
| + jne .L5
|
| + # basic block 11
|
| + # ../gdb.fortran/common-block.f90:21
|
| + .loc 1 21 0 discriminator 3
|
| + movsd foo_+8(%rip), %xmm0
|
| + # ../gdb.fortran/common-block.f90:38
|
| + .loc 1 38 0 discriminator 3
|
| + ucomisd .LC3(%rip), %xmm0
|
| + jp .L5
|
| + # basic block 12
|
| + ucomisd .LC3(%rip), %xmm0
|
| + je .L9
|
| +.L5:
|
| + # basic block 13
|
| + # ../gdb.fortran/common-block.f90:38
|
| + .loc 1 38 0 is_stmt 0 discriminator 1
|
| + movl $0, %eax
|
| + call _gfortran_abort
|
| +.L9:
|
| + # basic block 14
|
| + # ../gdb.fortran/common-block.f90:40
|
| + .loc 1 40 0 is_stmt 1
|
| + movl $0, fo_o_(%rip)
|
| + # ../gdb.fortran/common-block.f90:42
|
| + .loc 1 42 0
|
| + leave
|
| + .cfi_def_cfa 7, 8
|
| + ret
|
| + .cfi_endproc
|
| +.LFE0:
|
| + .size in_, .-in_
|
| + .type MAIN__, @function
|
| +MAIN__:
|
| +.LFB1:
|
| + # ../gdb.fortran/common-block.f90:44
|
| + .loc 1 44 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
|
| + # ../gdb.fortran/common-block.f90:57
|
| + .loc 1 57 0
|
| + movl $1, foo_(%rip)
|
| + # ../gdb.fortran/common-block.f90:58
|
| + .loc 1 58 0
|
| + movl $0x40000000, %eax
|
| + movl %eax, foo_+4(%rip)
|
| + # ../gdb.fortran/common-block.f90:59
|
| + .loc 1 59 0
|
| + movabsq $4613937818241073152, %rax
|
| + movq %rax, foo_+8(%rip)
|
| + # ../gdb.fortran/common-block.f90:61
|
| + .loc 1 61 0
|
| + movl $11, fo_o_(%rip)
|
| + # ../gdb.fortran/common-block.f90:62
|
| + .loc 1 62 0
|
| + movl $0x41b00000, %eax
|
| + movl %eax, fo_o_+4(%rip)
|
| + # ../gdb.fortran/common-block.f90:63
|
| + .loc 1 63 0
|
| + movabsq $4629841154425225216, %rax
|
| + movq %rax, fo_o_+8(%rip)
|
| + # ../gdb.fortran/common-block.f90:65
|
| + .loc 1 65 0
|
| + movl $0, %eax
|
| + call in_
|
| + # ../gdb.fortran/common-block.f90:67
|
| + .loc 1 67 0
|
| + popq %rbp
|
| + .cfi_def_cfa 7, 8
|
| + ret
|
| + .cfi_endproc
|
| +.LFE1:
|
| + .size MAIN__, .-MAIN__
|
| + .globl main
|
| + .type main, @function
|
| +main:
|
| +.LFB2:
|
| + # ../gdb.fortran/common-block.f90:67
|
| + .loc 1 67 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
|
| + subq $16, %rsp
|
| + movl %edi, -4(%rbp)
|
| + movq %rsi, -16(%rbp)
|
| + # ../gdb.fortran/common-block.f90:67
|
| + .loc 1 67 0
|
| + movq -16(%rbp), %rdx
|
| + movl -4(%rbp), %eax
|
| + movq %rdx, %rsi
|
| + movl %eax, %edi
|
| + call _gfortran_set_args
|
| + movl $options.0.1570, %esi
|
| + movl $8, %edi
|
| + call _gfortran_set_options
|
| + call MAIN__
|
| + movl $0, %eax
|
| + leave
|
| + .cfi_def_cfa 7, 8
|
| + ret
|
| + .cfi_endproc
|
| +.LFE2:
|
| + .size main, .-main
|
| + .comm foo_,16,16
|
| + .comm fo_o_,16,16
|
| + .section .rodata
|
| + .align 32
|
| + .type options.0.1570, @object
|
| + .size options.0.1570, 32
|
| +options.0.1570:
|
| + .long 68
|
| + .long 511
|
| + .long 0
|
| + .long 0
|
| + .long 0
|
| + .long 1
|
| + .long 0
|
| + .long 1
|
| + .align 4
|
| +.LC0:
|
| + .long 1102053376
|
| + .align 8
|
| +.LC1:
|
| + .long 0
|
| + .long 1077968896
|
| + .align 4
|
| +.LC2:
|
| + .long 1073741824
|
| + .align 8
|
| +.LC3:
|
| + .long 0
|
| + .long 1074266112
|
| + .text
|
| +.Letext0:
|
| + .section .debug_info,"",@progbits
|
| +.Ldebug_info0:
|
| +#if 0
|
| + .long 0x247 # Length of Compilation Unit Info
|
| +#else
|
| + .long .Ldebuginfo_end - .Ldebug_info1 # Length of Compilation Unit Info
|
| +.Ldebug_info1:
|
| +#endif
|
| + .value 0x4 # 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 .LASF13 # DW_AT_producer: "GNU Fortran 4.6.3 plus hand hackery"
|
| + .byte 0xe # DW_AT_language
|
| + .byte 0x2 # DW_AT_identifier_case
|
| + .long .LASF14 # DW_AT_name: "../gdb.fortran/common-block.f90"
|
| + .long .LASF15 # DW_AT_comp_dir: "gdb.dwarf2"
|
| + .quad .Ltext0 # DW_AT_low_pc
|
| + .quad .Letext0 # DW_AT_high_pc
|
| + .long .Ldebug_line0 # DW_AT_stmt_list
|
| + .uleb128 0x2 # (DIE (0x2e) DW_TAG_subprogram)
|
| + # DW_AT_external
|
| + .ascii "in\0" # DW_AT_name
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x15 # DW_AT_decl_line
|
| + .ascii "in_\0" # DW_AT_linkage_name
|
| + .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_tail_call_sites
|
| + .long 0x11a # DW_AT_sibling
|
| + .uleb128 0x3 # (DIE (0x4e) DW_TAG_common_block)
|
| + .long .LASF0 # DW_AT_name: "fo_o"
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x1f # DW_AT_decl_line
|
| + .long .LASF8 # DW_AT_linkage_name: "fo_o_"
|
| + .uleb128 0x9 # DW_AT_location
|
| + .byte 0x3 # DW_OP_addr
|
| + .quad fo_o_
|
| + .long 0xa5 # DW_AT_sibling
|
| +#if 0
|
| + .uleb128 0x4 # (DIE (0x67) DW_TAG_variable)
|
| +#else
|
| + .uleb128 0x10 # (DIE (0x1bb) DW_TAG_variable)
|
| +#endif
|
| + .ascii "ix\0" # DW_AT_name
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x17 # DW_AT_decl_line
|
| + .long 0x11a # DW_AT_type
|
| + # DW_AT_external
|
| +#if 0
|
| + .uleb128 0x9 # DW_AT_location
|
| + .byte 0x3 # DW_OP_addr
|
| + .quad fo_o_
|
| +#else
|
| + .uleb128 0x9 # DW_AT_data_member_location
|
| + # (size chosen to avoid renumbering all DIEs)
|
| + .byte 0x8 # DW_OP_const1u
|
| + .byte 0x0
|
| + .byte 0x96 # DW_OP_nop
|
| + .byte 0x96 # DW_OP_nop
|
| + .byte 0x96 # DW_OP_nop
|
| + .byte 0x96 # DW_OP_nop
|
| + .byte 0x96 # DW_OP_nop
|
| + .byte 0x96 # DW_OP_nop
|
| + .byte 0x96 # DW_OP_nop
|
| +#endif
|
| + .uleb128 0x4 # (DIE (0x7b) DW_TAG_variable)
|
| + .ascii "iy2\0" # DW_AT_name
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x18 # DW_AT_decl_line
|
| + .long 0x121 # DW_AT_type
|
| + # DW_AT_external
|
| + .uleb128 0x9 # DW_AT_location
|
| + .byte 0x3 # DW_OP_addr
|
| + .quad fo_o_+4
|
| + .uleb128 0x4 # (DIE (0x90) DW_TAG_variable)
|
| + .ascii "iz\0" # DW_AT_name
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x19 # DW_AT_decl_line
|
| + .long 0x128 # DW_AT_type
|
| + # DW_AT_external
|
| + .uleb128 0x9 # DW_AT_location
|
| + .byte 0x3 # DW_OP_addr
|
| + .quad fo_o_+8
|
| + .byte 0 # end of children of DIE 0x4e
|
| + .uleb128 0x5 # (DIE (0xa5) DW_TAG_common_block)
|
| + .ascii "foo\0" # DW_AT_name
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x20 # DW_AT_decl_line
|
| + .long .LASF16 # DW_AT_linkage_name: "foo_"
|
| + .uleb128 0x9 # DW_AT_location
|
| + .byte 0x3 # DW_OP_addr
|
| + .quad foo_
|
| + .long 0xfe # DW_AT_sibling
|
| + .uleb128 0x6 # (DIE (0xbe) DW_TAG_variable)
|
| + .long .LASF1 # DW_AT_name: "ix_x"
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x1b # DW_AT_decl_line
|
| + .long 0x11a # DW_AT_type
|
| + # DW_AT_external
|
| + .uleb128 0x9 # DW_AT_location
|
| + .byte 0x3 # DW_OP_addr
|
| + .quad foo_
|
| + .uleb128 0x6 # (DIE (0xd3) DW_TAG_variable)
|
| + .long .LASF2 # DW_AT_name: "iy_y"
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x1c # DW_AT_decl_line
|
| + .long 0x121 # DW_AT_type
|
| + # DW_AT_external
|
| + .uleb128 0x9 # DW_AT_location
|
| + .byte 0x3 # DW_OP_addr
|
| + .quad foo_+4
|
| + .uleb128 0x6 # (DIE (0xe8) DW_TAG_variable)
|
| + .long .LASF3 # DW_AT_name: "iz_z2"
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x1d # DW_AT_decl_line
|
| + .long 0x128 # DW_AT_type
|
| + # DW_AT_external
|
| + .uleb128 0x9 # DW_AT_location
|
| + .byte 0x3 # DW_OP_addr
|
| + .quad foo_+8
|
| + .byte 0 # end of children of DIE 0xa5
|
| + .uleb128 0x7 # (DIE (0xfe) DW_TAG_variable)
|
| + .ascii "iy\0" # DW_AT_name
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x22 # DW_AT_decl_line
|
| + .long 0x11a # DW_AT_type
|
| + .uleb128 0x2 # DW_AT_location
|
| + .byte 0x91 # DW_OP_fbreg
|
| + .sleb128 -20
|
| + .uleb128 0x8 # (DIE (0x10b) DW_TAG_variable)
|
| + .long .LASF4 # DW_AT_name: "iz_z"
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x23 # DW_AT_decl_line
|
| + .long 0x11a # DW_AT_type
|
| + .uleb128 0x2 # DW_AT_location
|
| + .byte 0x91 # DW_OP_fbreg
|
| + .sleb128 -24
|
| + .byte 0 # end of children of DIE 0x2e
|
| + .uleb128 0x9 # (DIE (0x11a) DW_TAG_base_type)
|
| + .byte 0x4 # DW_AT_byte_size
|
| + .byte 0x5 # DW_AT_encoding
|
| + .long .LASF5 # DW_AT_name: "integer(kind=4)"
|
| + .uleb128 0x9 # (DIE (0x121) DW_TAG_base_type)
|
| + .byte 0x4 # DW_AT_byte_size
|
| + .byte 0x4 # DW_AT_encoding
|
| + .long .LASF6 # DW_AT_name: "real(kind=4)"
|
| + .uleb128 0x9 # (DIE (0x128) DW_TAG_base_type)
|
| + .byte 0x8 # DW_AT_byte_size
|
| + .byte 0x4 # DW_AT_encoding
|
| + .long .LASF7 # DW_AT_name: "real(kind=8)"
|
| + .uleb128 0xa # (DIE (0x12f) DW_TAG_subprogram)
|
| + .long .LASF17 # DW_AT_name: "common_test"
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x2c # DW_AT_decl_line
|
| + .quad .LFB1 # DW_AT_low_pc
|
| + .quad .LFE1 # DW_AT_high_pc
|
| + .uleb128 0x1 # DW_AT_frame_base
|
| + .byte 0x9c # DW_OP_call_frame_cfa
|
| + # DW_AT_GNU_all_tail_call_sites
|
| + # DW_AT_main_subprogram
|
| + .byte 0x2 # DW_AT_calling_convention
|
| + .long 0x1f9 # DW_AT_sibling
|
| + .uleb128 0x3 # (DIE (0x14d) DW_TAG_common_block)
|
| + .long .LASF0 # DW_AT_name: "fo_o"
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x1f # DW_AT_decl_line
|
| + .long .LASF8 # DW_AT_linkage_name: "fo_o_"
|
| + .uleb128 0x9 # DW_AT_location
|
| + .byte 0x3 # DW_OP_addr
|
| + .quad fo_o_
|
| + .long 0x1a6 # DW_AT_sibling
|
| + .uleb128 0x6 # (DIE (0x166) DW_TAG_variable)
|
| + .long .LASF1 # DW_AT_name: "ix_x"
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x32 # DW_AT_decl_line
|
| + .long 0x11a # DW_AT_type
|
| + # DW_AT_external
|
| + .uleb128 0x9 # DW_AT_location
|
| + .byte 0x3 # DW_OP_addr
|
| + .quad fo_o_
|
| + .uleb128 0x6 # (DIE (0x17b) DW_TAG_variable)
|
| + .long .LASF2 # DW_AT_name: "iy_y"
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x33 # DW_AT_decl_line
|
| + .long 0x121 # DW_AT_type
|
| + # DW_AT_external
|
| + .uleb128 0x9 # DW_AT_location
|
| + .byte 0x3 # DW_OP_addr
|
| + .quad fo_o_+4
|
| + .uleb128 0x6 # (DIE (0x190) DW_TAG_variable)
|
| + .long .LASF4 # DW_AT_name: "iz_z"
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x34 # DW_AT_decl_line
|
| + .long 0x128 # DW_AT_type
|
| + # DW_AT_external
|
| + .uleb128 0x9 # DW_AT_location
|
| + .byte 0x3 # DW_OP_addr
|
| + .quad fo_o_+8
|
| + .byte 0 # end of children of DIE 0x14d
|
| + .uleb128 0xb # (DIE (0x1a6) DW_TAG_common_block)
|
| + .ascii "foo\0" # DW_AT_name
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x20 # DW_AT_decl_line
|
| + .long .LASF16 # DW_AT_linkage_name: "foo_"
|
| + .uleb128 0x9 # DW_AT_location
|
| + .byte 0x3 # DW_OP_addr
|
| + .quad foo_
|
| +#if 0
|
| + .uleb128 0x4 # (DIE (0x1bb) DW_TAG_variable)
|
| +#else
|
| + .uleb128 0x10 # (DIE (0x1bb) DW_TAG_variable)
|
| +#endif
|
| + .ascii "ix\0" # DW_AT_name
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x2e # DW_AT_decl_line
|
| + .long 0x11a # DW_AT_type
|
| + # DW_AT_external
|
| +#if 0
|
| + .uleb128 0x9 # DW_AT_location
|
| + .byte 0x3 # DW_OP_addr
|
| + .quad foo_
|
| +#else
|
| + .uleb128 0x9 # DW_AT_data_member_location
|
| + # (size chosen to avoid renumbering all DIEs)
|
| + .byte 0x8 # DW_OP_const1u
|
| + .byte 0x0
|
| + .byte 0x96 # DW_OP_nop
|
| + .byte 0x96 # DW_OP_nop
|
| + .byte 0x96 # DW_OP_nop
|
| + .byte 0x96 # DW_OP_nop
|
| + .byte 0x96 # DW_OP_nop
|
| + .byte 0x96 # DW_OP_nop
|
| + .byte 0x96 # DW_OP_nop
|
| +#endif
|
| + .uleb128 0x4 # (DIE (0x1cf) DW_TAG_variable)
|
| + .ascii "iy\0" # DW_AT_name
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x2f # DW_AT_decl_line
|
| + .long 0x121 # DW_AT_type
|
| + # DW_AT_external
|
| + .uleb128 0x9 # DW_AT_location
|
| + .byte 0x3 # DW_OP_addr
|
| + .quad foo_+4
|
| + .uleb128 0x4 # (DIE (0x1e3) DW_TAG_variable)
|
| + .ascii "iz\0" # DW_AT_name
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x30 # DW_AT_decl_line
|
| + .long 0x128 # DW_AT_type
|
| + # DW_AT_external
|
| + .uleb128 0x9 # DW_AT_location
|
| + .byte 0x3 # DW_OP_addr
|
| + .quad foo_+8
|
| + .byte 0 # end of children of DIE 0x1a6
|
| + .byte 0 # end of children of DIE 0x12f
|
| + .uleb128 0xc # (DIE (0x1f9) DW_TAG_subprogram)
|
| + # DW_AT_external
|
| + .long .LASF9 # DW_AT_name: "main"
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x43 # DW_AT_decl_line
|
| + .long 0x11a # DW_AT_type
|
| + .quad .LFB2 # DW_AT_low_pc
|
| + .quad .LFE2 # DW_AT_high_pc
|
| + .uleb128 0x1 # DW_AT_frame_base
|
| + .byte 0x9c # DW_OP_call_frame_cfa
|
| + # DW_AT_GNU_all_tail_call_sites
|
| + .long 0x238 # DW_AT_sibling
|
| + .uleb128 0xd # (DIE (0x21a) DW_TAG_formal_parameter)
|
| + .long .LASF10 # DW_AT_name: "argc"
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x43 # DW_AT_decl_line
|
| + .long 0x238 # DW_AT_type
|
| + .uleb128 0x2 # DW_AT_location
|
| + .byte 0x91 # DW_OP_fbreg
|
| + .sleb128 -20
|
| + .uleb128 0xd # (DIE (0x228) DW_TAG_formal_parameter)
|
| + .long .LASF11 # DW_AT_name: "argv"
|
| + .byte 0x1 # DW_AT_decl_file (../gdb.fortran/common-block.f90)
|
| + .byte 0x43 # DW_AT_decl_line
|
| + .long 0x23d # DW_AT_type
|
| + .uleb128 0x3 # DW_AT_location
|
| + .byte 0x91 # DW_OP_fbreg
|
| + .sleb128 -32
|
| + .byte 0x6 # DW_OP_deref
|
| + .byte 0 # end of children of DIE 0x1f9
|
| + .uleb128 0xe # (DIE (0x238) DW_TAG_const_type)
|
| + .long 0x11a # DW_AT_type
|
| + .uleb128 0xf # (DIE (0x23d) DW_TAG_pointer_type)
|
| + .byte 0x8 # DW_AT_byte_size
|
| + .long 0x243 # DW_AT_type
|
| + .uleb128 0x9 # (DIE (0x243) DW_TAG_base_type)
|
| + .byte 0x1 # DW_AT_byte_size
|
| + .byte 0x8 # DW_AT_encoding
|
| + .long .LASF12 # DW_AT_name: "character(kind=1)"
|
| + .byte 0 # end of children of DIE 0xb
|
| +#if 0
|
| +#else
|
| +.Ldebuginfo_end:
|
| +#endif
|
| + .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 0x42 # (DW_AT_identifier_case)
|
| + .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 0x1 # DW_children_yes
|
| + .uleb128 0x3f # (DW_AT_external)
|
| + .uleb128 0x19 # (DW_FORM_flag_present)
|
| + .uleb128 0x3 # (DW_AT_name)
|
| + .uleb128 0x8 # (DW_FORM_string)
|
| + .uleb128 0x3a # (DW_AT_decl_file)
|
| + .uleb128 0xb # (DW_FORM_data1)
|
| + .uleb128 0x3b # (DW_AT_decl_line)
|
| + .uleb128 0xb # (DW_FORM_data1)
|
| + .uleb128 0x6e # (DW_AT_linkage_name)
|
| + .uleb128 0x8 # (DW_FORM_string)
|
| + .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 0x2116 # (DW_AT_GNU_all_tail_call_sites)
|
| + .uleb128 0x19 # (DW_FORM_flag_present)
|
| + .uleb128 0x1 # (DW_AT_sibling)
|
| + .uleb128 0x13 # (DW_FORM_ref4)
|
| + .byte 0
|
| + .byte 0
|
| + .uleb128 0x3 # (abbrev code)
|
| + .uleb128 0x1a # (TAG: DW_TAG_common_block)
|
| + .byte 0x1 # DW_children_yes
|
| + .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 0x6e # (DW_AT_linkage_name)
|
| + .uleb128 0xe # (DW_FORM_strp)
|
| + .uleb128 0x2 # (DW_AT_location)
|
| + .uleb128 0x18 # (DW_FORM_exprloc)
|
| + .uleb128 0x1 # (DW_AT_sibling)
|
| + .uleb128 0x13 # (DW_FORM_ref4)
|
| + .byte 0
|
| + .byte 0
|
| + .uleb128 0x4 # (abbrev code)
|
| + .uleb128 0x34 # (TAG: DW_TAG_variable)
|
| + .byte 0 # DW_children_no
|
| + .uleb128 0x3 # (DW_AT_name)
|
| + .uleb128 0x8 # (DW_FORM_string)
|
| + .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 0x3f # (DW_AT_external)
|
| + .uleb128 0x19 # (DW_FORM_flag_present)
|
| + .uleb128 0x2 # (DW_AT_location)
|
| + .uleb128 0x18 # (DW_FORM_exprloc)
|
| + .byte 0
|
| + .byte 0
|
| + .uleb128 0x5 # (abbrev code)
|
| + .uleb128 0x1a # (TAG: DW_TAG_common_block)
|
| + .byte 0x1 # DW_children_yes
|
| + .uleb128 0x3 # (DW_AT_name)
|
| + .uleb128 0x8 # (DW_FORM_string)
|
| + .uleb128 0x3a # (DW_AT_decl_file)
|
| + .uleb128 0xb # (DW_FORM_data1)
|
| + .uleb128 0x3b # (DW_AT_decl_line)
|
| + .uleb128 0xb # (DW_FORM_data1)
|
| + .uleb128 0x6e # (DW_AT_linkage_name)
|
| + .uleb128 0xe # (DW_FORM_strp)
|
| + .uleb128 0x2 # (DW_AT_location)
|
| + .uleb128 0x18 # (DW_FORM_exprloc)
|
| + .uleb128 0x1 # (DW_AT_sibling)
|
| + .uleb128 0x13 # (DW_FORM_ref4)
|
| + .byte 0
|
| + .byte 0
|
| + .uleb128 0x6 # (abbrev code)
|
| + .uleb128 0x34 # (TAG: DW_TAG_variable)
|
| + .byte 0 # DW_children_no
|
| + .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 0x3f # (DW_AT_external)
|
| + .uleb128 0x19 # (DW_FORM_flag_present)
|
| + .uleb128 0x2 # (DW_AT_location)
|
| + .uleb128 0x18 # (DW_FORM_exprloc)
|
| + .byte 0
|
| + .byte 0
|
| + .uleb128 0x7 # (abbrev code)
|
| + .uleb128 0x34 # (TAG: DW_TAG_variable)
|
| + .byte 0 # DW_children_no
|
| + .uleb128 0x3 # (DW_AT_name)
|
| + .uleb128 0x8 # (DW_FORM_string)
|
| + .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 0x2 # (DW_AT_location)
|
| + .uleb128 0x18 # (DW_FORM_exprloc)
|
| + .byte 0
|
| + .byte 0
|
| + .uleb128 0x8 # (abbrev code)
|
| + .uleb128 0x34 # (TAG: DW_TAG_variable)
|
| + .byte 0 # DW_children_no
|
| + .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 0x2 # (DW_AT_location)
|
| + .uleb128 0x18 # (DW_FORM_exprloc)
|
| + .byte 0
|
| + .byte 0
|
| + .uleb128 0x9 # (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 0xe # (DW_FORM_strp)
|
| + .byte 0
|
| + .byte 0
|
| + .uleb128 0xa # (abbrev code)
|
| + .uleb128 0x2e # (TAG: DW_TAG_subprogram)
|
| + .byte 0x1 # DW_children_yes
|
| + .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 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 0x2116 # (DW_AT_GNU_all_tail_call_sites)
|
| + .uleb128 0x19 # (DW_FORM_flag_present)
|
| + .uleb128 0x6a # (DW_AT_main_subprogram)
|
| + .uleb128 0x19 # (DW_FORM_flag_present)
|
| + .uleb128 0x36 # (DW_AT_calling_convention)
|
| + .uleb128 0xb # (DW_FORM_data1)
|
| + .uleb128 0x1 # (DW_AT_sibling)
|
| + .uleb128 0x13 # (DW_FORM_ref4)
|
| + .byte 0
|
| + .byte 0
|
| + .uleb128 0xb # (abbrev code)
|
| + .uleb128 0x1a # (TAG: DW_TAG_common_block)
|
| + .byte 0x1 # DW_children_yes
|
| + .uleb128 0x3 # (DW_AT_name)
|
| + .uleb128 0x8 # (DW_FORM_string)
|
| + .uleb128 0x3a # (DW_AT_decl_file)
|
| + .uleb128 0xb # (DW_FORM_data1)
|
| + .uleb128 0x3b # (DW_AT_decl_line)
|
| + .uleb128 0xb # (DW_FORM_data1)
|
| + .uleb128 0x6e # (DW_AT_linkage_name)
|
| + .uleb128 0xe # (DW_FORM_strp)
|
| + .uleb128 0x2 # (DW_AT_location)
|
| + .uleb128 0x18 # (DW_FORM_exprloc)
|
| + .byte 0
|
| + .byte 0
|
| + .uleb128 0xc # (abbrev code)
|
| + .uleb128 0x2e # (TAG: DW_TAG_subprogram)
|
| + .byte 0x1 # DW_children_yes
|
| + .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 0x2116 # (DW_AT_GNU_all_tail_call_sites)
|
| + .uleb128 0x19 # (DW_FORM_flag_present)
|
| + .uleb128 0x1 # (DW_AT_sibling)
|
| + .uleb128 0x13 # (DW_FORM_ref4)
|
| + .byte 0
|
| + .byte 0
|
| + .uleb128 0xd # (abbrev code)
|
| + .uleb128 0x5 # (TAG: DW_TAG_formal_parameter)
|
| + .byte 0 # DW_children_no
|
| + .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 0x2 # (DW_AT_location)
|
| + .uleb128 0x18 # (DW_FORM_exprloc)
|
| + .byte 0
|
| + .byte 0
|
| + .uleb128 0xe # (abbrev code)
|
| + .uleb128 0x26 # (TAG: DW_TAG_const_type)
|
| + .byte 0 # DW_children_no
|
| + .uleb128 0x49 # (DW_AT_type)
|
| + .uleb128 0x13 # (DW_FORM_ref4)
|
| + .byte 0
|
| + .byte 0
|
| + .uleb128 0xf # (abbrev code)
|
| + .uleb128 0xf # (TAG: DW_TAG_pointer_type)
|
| + .byte 0 # DW_children_no
|
| + .uleb128 0xb # (DW_AT_byte_size)
|
| + .uleb128 0xb # (DW_FORM_data1)
|
| + .uleb128 0x49 # (DW_AT_type)
|
| + .uleb128 0x13 # (DW_FORM_ref4)
|
| + .byte 0
|
| + .byte 0
|
| +#if 0
|
| +#else
|
| + .uleb128 0x10 # (abbrev code)
|
| + .uleb128 0x34 # (TAG: DW_TAG_variable)
|
| + .byte 0 # DW_children_no
|
| + .uleb128 0x3 # (DW_AT_name)
|
| + .uleb128 0x8 # (DW_FORM_string)
|
| + .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 0x3f # (DW_AT_external)
|
| + .uleb128 0x19 # (DW_FORM_flag_present)
|
| + .uleb128 0x38 # (DW_AT_data_member_location)
|
| + .uleb128 0x18 # (DW_FORM_exprloc)
|
| + .byte 0
|
| + .byte 0
|
| +#endif
|
| + .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 "fo_o"
|
| +.LASF8:
|
| + .string "fo_o_"
|
| +.LASF3:
|
| + .string "iz_z2"
|
| +.LASF1:
|
| + .string "ix_x"
|
| +.LASF9:
|
| + .string "main"
|
| +.LASF4:
|
| + .string "iz_z"
|
| +.LASF13:
|
| + .string "GNU Fortran 4.6.3 plus hand hackery"
|
| +.LASF16:
|
| + .string "foo_"
|
| +.LASF7:
|
| + .string "real(kind=8)"
|
| +.LASF5:
|
| + .string "integer(kind=4)"
|
| +.LASF17:
|
| + .string "common_test"
|
| +.LASF12:
|
| + .string "character(kind=1)"
|
| +.LASF14:
|
| + .string "../gdb.fortran/common-block.f90"
|
| +.LASF10:
|
| + .string "argc"
|
| +.LASF2:
|
| + .string "iy_y"
|
| +.LASF11:
|
| + .string "argv"
|
| +.LASF15:
|
| + .string "gdb.dwarf2"
|
| +.LASF6:
|
| + .string "real(kind=4)"
|
| + .ident "GCC: (GNU) 4.6.3 20120306 (Red Hat 4.6.3-2)"
|
| + .section .note.GNU-stack,"",@progbits
|
|
|