gdb/testsuite/gdb.dwarf2/dw2-case-insensitive-debug.S

   1 /* This testcase is part of GDB, the GNU debugger.
   2
   3    Copyright 2011-2022 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         /* The .debug_names-based index support depends on
  61            .debug_aranges generated by GCC.  (.gdb_index includes a
  62            gdb-generated map instead.)  */
  63         .section        .debug_aranges,"",@progbits
  64         .4byte  .Laranges_end - .Laranges_start // Length of Address Ranges Info
  65 .Laranges_start:
  66         .2byte  0x2     // DWARF Version
  67         .4byte  .Lcu1_begin // .Ldebug_info0 - Offset of Compilation Unit Info
  68         .byte   PTRBITS / 8     // Size of Address
  69         .byte   0       // Size of Segment Descriptor
  70         .2byte  0       // Pad to 16 byte boundary
  71         .2byte  0
  72         PTRBYTE cu_text_start   // Address
  73         PTRBYTE 0x1000 // cu_text_end - cu_text_start   // Length
  74         PTRBYTE 0
  75         PTRBYTE 0
  76 .Laranges_end:
  77
  78 /* Abbrev table */
  79         .section .debug_abbrev
  80 .Labbrev1_begin:
  81         .uleb128        1                       /* Abbrev code */
  82         .uleb128        0x11                    /* DW_TAG_compile_unit */
  83         .byte           1                       /* has_children */
  84         .uleb128        0x3                     /* DW_AT_name */
  85         .uleb128        0x8                     /* DW_FORM_string */
  86         .uleb128        0x25                    /* DW_AT_producer */
  87         .uleb128        0x8                     /* DW_FORM_string */
  88         .uleb128        0x13                    /* DW_AT_language */
  89         .uleb128        0xb                     /* DW_FORM_data1 */
  90         .uleb128        0x11                    /* DW_AT_low_pc */
  91         .uleb128        0x1                     /* DW_FORM_addr */
  92         .uleb128        0x12                    /* DW_AT_high_pc */
  93         .uleb128        0x1                     /* DW_FORM_addr */
  94         .byte           0x0                     /* Terminator */
  95         .byte           0x0                     /* Terminator */
  96
  97         .uleb128        3                       /* Abbrev code */
  98         .uleb128        0x2e                    /* DW_TAG_subprogram */
  99         .byte           0                       /* has_children */
 100         .uleb128        0x3f                    /* DW_AT_external */
 101         .uleb128        0xc                     /* DW_FORM_flag */
 102         .uleb128        0x3                     /* DW_AT_name */
 103         .uleb128        0x8                     /* DW_FORM_string */
 104         .uleb128        0x11                    /* DW_AT_low_pc */
 105         .uleb128        0x1                     /* DW_FORM_addr */
 106         .uleb128        0x12                    /* DW_AT_high_pc */
 107         .uleb128        0x1                     /* DW_FORM_addr */
 108         .uleb128        0x27                    /* DW_AT_prototyped */
 109         .uleb128        0xc                     /* DW_FORM_flag */
 110         .uleb128        0x49                    /* DW_AT_type */
 111         .uleb128        0x13                    /* DW_FORM_ref4 */
 112         .byte           0x0                     /* Terminator */
 113         .byte           0x0                     /* Terminator */
 114
 115         .uleb128        0x5                     /* Abbrev code */
 116         .uleb128        0x24                    /* DW_TAG_base_type */
 117         .byte           0x0                     /* DW_children_no */
 118         .uleb128        0xb                     /* DW_AT_byte_size */
 119         .uleb128        0xb                     /* DW_FORM_data1 */
 120         .uleb128        0x3e                    /* DW_AT_encoding */
 121         .uleb128        0xb                     /* DW_FORM_data1 */
 122         .uleb128        0x3                     /* DW_AT_name */
 123         .uleb128        0x8                     /* DW_FORM_string */
 124         .byte           0x0                     /* Terminator */
 125         .byte           0x0                     /* Terminator */
 126
 127         .byte           0x0                     /* Terminator */
 128         .byte           0x0                     /* Terminator */