1/* This testcase is part of GDB, the GNU debugger. 2 3 Copyright 2011-2016 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#if PTRBITS == 64 19# define PTRBYTE .8byte 20#elif PTRBITS == 32 21# define PTRBYTE .4byte 22#else 23# error "Unsupported pointer size" 24#endif 25 26 .section .debug_info 27.Lcu1_begin: 28 /* CU header */ 29 .4byte .Lcu1_end - .Lcu1_start /* Length of Compilation Unit */ 30.Lcu1_start: 31 .2byte 2 /* DWARF Version */ 32 .4byte .Labbrev1_begin /* Offset into abbrev section */ 33 .byte PTRBITS / 8 /* Pointer size */ 34 35 /* CU die */ 36 .uleb128 1 /* Abbrev: DW_TAG_compile_unit */ 37 .ascii "file1.txt\0" /* DW_AT_name */ 38 .ascii "GNU C 3.3.3\0" /* DW_AT_producer */ 39 .byte 8 /* DW_AT_language (DW_LANG_Fortran90) */ 40 PTRBYTE cu_text_start /* DW_AT_low_pc */ 41 PTRBYTE cu_text_end /* DW_AT_high_pc */ 42 43 .uleb128 3 /* Abbrev: DW_TAG_subprogram */ 44 .byte 1 /* DW_AT_external */ 45 .ascii "FUNC_lang\0" /* DW_AT_name */ 46 PTRBYTE FUNC_lang_start /* DW_AT_low_pc */ 47 PTRBYTE FUNC_lang_end /* DW_AT_high_pc */ 48 .byte 1 /* DW_AT_prototyped */ 49 .4byte .Ltype - .Lcu1_begin /* DW_AT_type */ 50 51.Ltype: 52 .uleb128 0x5 /* Abbrev: DW_TAG_base_type */ 53 .byte 0x4 /* DW_AT_byte_size */ 54 .byte 0x5 /* DW_AT_encoding */ 55 .ascii "foo\0" /* DW_AT_name */ 56 57 .byte 0 /* End of children of CU */ 58.Lcu1_end: 59 60/* Abbrev table */ 61 .section .debug_abbrev 62.Labbrev1_begin: 63 .uleb128 1 /* Abbrev code */ 64 .uleb128 0x11 /* DW_TAG_compile_unit */ 65 .byte 1 /* has_children */ 66 .uleb128 0x3 /* DW_AT_name */ 67 .uleb128 0x8 /* DW_FORM_string */ 68 .uleb128 0x25 /* DW_AT_producer */ 69 .uleb128 0x8 /* DW_FORM_string */ 70 .uleb128 0x13 /* DW_AT_language */ 71 .uleb128 0xb /* DW_FORM_data1 */ 72 .uleb128 0x11 /* DW_AT_low_pc */ 73 .uleb128 0x1 /* DW_FORM_addr */ 74 .uleb128 0x12 /* DW_AT_high_pc */ 75 .uleb128 0x1 /* DW_FORM_addr */ 76 .byte 0x0 /* Terminator */ 77 .byte 0x0 /* Terminator */ 78 79 .uleb128 3 /* Abbrev code */ 80 .uleb128 0x2e /* DW_TAG_subprogram */ 81 .byte 0 /* has_children */ 82 .uleb128 0x3f /* DW_AT_external */ 83 .uleb128 0xc /* DW_FORM_flag */ 84 .uleb128 0x3 /* DW_AT_name */ 85 .uleb128 0x8 /* DW_FORM_string */ 86 .uleb128 0x11 /* DW_AT_low_pc */ 87 .uleb128 0x1 /* DW_FORM_addr */ 88 .uleb128 0x12 /* DW_AT_high_pc */ 89 .uleb128 0x1 /* DW_FORM_addr */ 90 .uleb128 0x27 /* DW_AT_prototyped */ 91 .uleb128 0xc /* DW_FORM_flag */ 92 .uleb128 0x49 /* DW_AT_type */ 93 .uleb128 0x13 /* DW_FORM_ref4 */ 94 .byte 0x0 /* Terminator */ 95 .byte 0x0 /* Terminator */ 96 97 .uleb128 0x5 /* Abbrev code */ 98 .uleb128 0x24 /* DW_TAG_base_type */ 99 .byte 0x0 /* DW_children_no */ 100 .uleb128 0xb /* DW_AT_byte_size */ 101 .uleb128 0xb /* DW_FORM_data1 */ 102 .uleb128 0x3e /* DW_AT_encoding */ 103 .uleb128 0xb /* DW_FORM_data1 */ 104 .uleb128 0x3 /* DW_AT_name */ 105 .uleb128 0x8 /* DW_FORM_string */ 106 .byte 0x0 /* Terminator */ 107 .byte 0x0 /* Terminator */ 108 109 .byte 0x0 /* Terminator */ 110 .byte 0x0 /* Terminator */ 111