gdb/
[binutils-gdb.git] / gdb / testsuite / gdb.dwarf2 / dw2-op-call.S
1 /* This testcase is part of GDB, the GNU debugger.
2
3 Copyright 2009 Free Software Foundation, Inc.
4
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 3 of the License, or
8 (at your option) any later version.
9
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with this program. If not, see <http://www.gnu.org/licenses/>. */
17
18 /* Test DW_OP_call2 and DW_OP_call4, PR gdb/10640. */
19
20 .section .data
21 array1: .2byte 1
22 array2: .2byte 2
23 array3: .2byte 3
24
25 .section .debug_info
26 .Lcu1_begin:
27 /* CU header */
28 .4byte .Lcu1_end - .Lcu1_start /* Length of Compilation Unit */
29 .Lcu1_start:
30 .2byte 2 /* DWARF Version */
31 .4byte .Labbrev1_begin /* Offset into abbrev section */
32 .byte 4 /* Pointer size */
33
34 /* CU die */
35 .uleb128 1 /* Abbrev: DW_TAG_compile_unit */
36 .ascii "file1.txt\0" /* DW_AT_name */
37 .ascii "GNU C 3.3.3\0" /* DW_AT_producer */
38 .byte 2 /* DW_LANG_C (C) */
39
40 .L2byte_type:
41 .uleb128 2 /* Abbrev: DW_TAG_base_type */
42 .ascii "2byte\0" /* DW_AT_name */
43 .byte 2 /* DW_AT_byte_size */
44 .byte 7 /* DW_AT_encoding: DW_ATE_unsigned */
45
46 .Larray1:
47 .uleb128 3 /* Abbrev: DW_TAG_variable */
48 .ascii "array1\0" /* DW_AT_name */
49 .4byte .L2byte_type-.Lcu1_begin /* DW_AT_type */
50 .byte 2f - 1f /* DW_AT_location */
51 1: .byte 3 /* DW_OP_addr */
52 .4byte array /* <addr> */
53 2:
54
55 .uleb128 3 /* Abbrev: DW_TAG_variable */
56 .ascii "array2\0" /* DW_AT_name */
57 .4byte .L2byte_type-.Lcu1_begin /* DW_AT_type */
58 .byte 2f - 1f /* DW_AT_location */
59 1: .byte 0x98 /* DW_OP_call2 */
60 .2byte .Larray1-.Lcu1_begin /* <current CU offset> */
61 .byte 0x23 /* DW_OP_plus_uconst */
62 .uleb128 array2-array1 /* <uconst> */
63 2:
64
65 .uleb128 3 /* Abbrev: DW_TAG_variable */
66 .ascii "array3\0" /* DW_AT_name */
67 .4byte .L2byte_type-.Lcu1_begin /* DW_AT_type */
68 .byte 2f - 1f /* DW_AT_location */
69 1: .byte 0x99 /* DW_OP_call4 */
70 .4byte .Larray1-.Lcu1_begin /* <current CU offset> */
71 .byte 0x23 /* DW_OP_plus_uconst */
72 .uleb128 array3-array1 /* <uconst> */
73 2:
74
75 .byte 0 /* End of children of CU */
76
77 .Lcu1_end:
78
79 /* Abbrev table */
80 .section .debug_abbrev
81 .Labbrev1_begin:
82 .uleb128 1 /* Abbrev code */
83 .uleb128 0x11 /* DW_TAG_compile_unit */
84 .byte 1 /* has_children */
85 .uleb128 0x3 /* DW_AT_name */
86 .uleb128 0x8 /* DW_FORM_string */
87 .uleb128 0x25 /* DW_AT_producer */
88 .uleb128 0x8 /* DW_FORM_string */
89 .uleb128 0x13 /* DW_AT_language */
90 .uleb128 0xb /* DW_FORM_data1 */
91 .byte 0x0 /* Terminator */
92 .byte 0x0 /* Terminator */
93
94 .uleb128 2 /* Abbrev code */
95 .uleb128 0x24 /* DW_TAG_base_type */
96 .byte 0 /* has_children */
97 .uleb128 0x3 /* DW_AT_name */
98 .uleb128 0x8 /* DW_FORM_string */
99 .uleb128 0xb /* DW_AT_byte_size */
100 .uleb128 0xb /* DW_FORM_data1 */
101 .uleb128 0x3e /* DW_AT_encoding */
102 .uleb128 0xb /* DW_FORM_data1 */
103 .byte 0x0 /* Terminator */
104 .byte 0x0 /* Terminator */
105
106 .uleb128 3 /* Abbrev code */
107 .uleb128 0x34 /* DW_TAG_variable */
108 .byte 0 /* has_children */
109 .uleb128 0x3 /* DW_AT_name */
110 .uleb128 0x8 /* DW_FORM_string */
111 .uleb128 0x49 /* DW_AT_type */
112 .uleb128 0x13 /* DW_FORM_ref4 */
113 .uleb128 0x2 /* DW_AT_location */
114 .uleb128 0xa /* DW_FORM_block1 */
115 .byte 0x0 /* Terminator */
116 .byte 0x0 /* Terminator */
117
118 .byte 0x0 /* Terminator */
119 .byte 0x0 /* Terminator */