559a7a6201
* gdb.texinfo (Index Section Format): Change the version to 5. Describe the different formula. gdb/ Case insensitive lookups implementation. * dwarf2read.c: Include ctype.h. (struct mapped_index): New field version. (mapped_index_string_hash): New parameter index_version. New comment for it. Call tolower appropriately. (find_slot_in_mapped_hash): New variable cmp, initialize it, use it. Choose the right index version for mapped_index_string_hash. (dwarf2_read_index): Support also the index version 5. Initialize the new struct mapped_index field version. (hash_strtab_entry): Pass INT_MAX for the new parameter, explain why. (find_slot): Explain the version needs. Pass INT_MAX for the new parameter. (write_psymtabs_to_index): Produce version 5. * minsyms.c (lookup_minimal_symbol): New variable cmp, initialize it, use it. New comment for SYMBOL_MATCHES_SEARCH_NAME. * psymtab.c (lookup_partial_symbol): Find the SYMBOL_MATCHES_SEARCH_NAME start of the found block of matching entries. * symtab.c (lookup_symbol_in_language): Remove the case_sensitive_off NAME lowercasing. (search_symbols): Pass REG_ICASE to regcomp for case_sensitive_off. (completion_list_add_name): New variable ncmp, initialize it, use it. * symtab.h (SYMBOL_HASH_NEXT): Always call tolower. * utils.c (strcmp_iw): Support case_sensitive_off. (strcmp_iw_ordered): Sort in a way compatible with case_sensitive_off. New function comment part. New variables saved_string1, saved_string2 and case_pass. Add a proper second pass. gdb/testsuite/ * gdb.base/fortran-sym-case.c: New file. * gdb.base/fortran-sym-case.exp: New file. * gdb.dwarf2/dw2-case-insensitive-debug.S: New file. * gdb.dwarf2/dw2-case-insensitive.c: New file. * gdb.dwarf2/dw2-case-insensitive.exp: New file.
102 lines
3.3 KiB
ArmAsm
102 lines
3.3 KiB
ArmAsm
/* This testcase is part of GDB, the GNU debugger.
|
|
|
|
Copyright 2011 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/>. */
|
|
|
|
.section .debug_info
|
|
.Lcu1_begin:
|
|
/* CU header */
|
|
.4byte .Lcu1_end - .Lcu1_start /* Length of Compilation Unit */
|
|
.Lcu1_start:
|
|
.2byte 2 /* DWARF Version */
|
|
.4byte .Labbrev1_begin /* Offset into abbrev section */
|
|
.byte 4 /* Pointer size */
|
|
|
|
/* CU die */
|
|
.uleb128 1 /* Abbrev: DW_TAG_compile_unit */
|
|
.ascii "file1.txt\0" /* DW_AT_name */
|
|
.ascii "GNU C 3.3.3\0" /* DW_AT_producer */
|
|
.byte 8 /* DW_AT_language (DW_LANG_Fortran90) */
|
|
.4byte FUNC_lang /* DW_AT_low_pc */
|
|
.4byte main /* DW_AT_high_pc */
|
|
|
|
.uleb128 3 /* Abbrev: DW_TAG_subprogram */
|
|
.byte 1 /* DW_AT_external */
|
|
.ascii "FUNC_lang\0" /* DW_AT_name */
|
|
.4byte FUNC_lang /* DW_AT_low_pc */
|
|
.4byte main /* DW_AT_high_pc */
|
|
.byte 1 /* DW_AT_prototyped */
|
|
.4byte .Ltype - .Lcu1_begin /* DW_AT_type */
|
|
|
|
.Ltype:
|
|
.uleb128 0x5 /* Abbrev: DW_TAG_base_type */
|
|
.byte 0x4 /* DW_AT_byte_size */
|
|
.byte 0x5 /* DW_AT_encoding */
|
|
.ascii "foo\0" /* DW_AT_name */
|
|
|
|
.byte 0 /* End of children of CU */
|
|
.Lcu1_end:
|
|
|
|
/* Abbrev table */
|
|
.section .debug_abbrev
|
|
.Labbrev1_begin:
|
|
.uleb128 1 /* Abbrev code */
|
|
.uleb128 0x11 /* DW_TAG_compile_unit */
|
|
.byte 1 /* has_children */
|
|
.uleb128 0x3 /* DW_AT_name */
|
|
.uleb128 0x8 /* DW_FORM_string */
|
|
.uleb128 0x25 /* DW_AT_producer */
|
|
.uleb128 0x8 /* DW_FORM_string */
|
|
.uleb128 0x13 /* DW_AT_language */
|
|
.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 */
|
|
.byte 0x0 /* Terminator */
|
|
.byte 0x0 /* Terminator */
|
|
|
|
.uleb128 3 /* Abbrev code */
|
|
.uleb128 0x2e /* DW_TAG_subprogram */
|
|
.byte 0 /* has_children */
|
|
.uleb128 0x3f /* DW_AT_external */
|
|
.uleb128 0xc /* DW_FORM_flag */
|
|
.uleb128 0x3 /* DW_AT_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 0x27 /* DW_AT_prototyped */
|
|
.uleb128 0xc /* DW_FORM_flag */
|
|
.uleb128 0x49 /* DW_AT_type */
|
|
.uleb128 0x13 /* DW_FORM_ref4 */
|
|
.byte 0x0 /* Terminator */
|
|
.byte 0x0 /* Terminator */
|
|
|
|
.uleb128 0x5 /* Abbrev code */
|
|
.uleb128 0x24 /* DW_TAG_base_type */
|
|
.byte 0x0 /* 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 0x0 /* Terminator */
|
|
.byte 0x0 /* Terminator */
|
|
|
|
.byte 0x0 /* Terminator */
|
|
.byte 0x0 /* Terminator */
|