From 2fa6d00cc6686e8bf081d736de44c22ecf61a795 Mon Sep 17 00:00:00 2001 From: marxin Date: Thu, 13 Jul 2017 10:08:14 +0200 Subject: [PATCH] Cleanup #2 of Pascal references. gcc/ChangeLog: 2017-07-13 Martin Liska * dwarf2out.c (gen_pointer_type_die): Remove dead code. (gen_reference_type_die): Likewise. * stor-layout.c: Remove Pascal-related comment. --- gcc/dwarf2out.c | 40 ---------------------------------------- gcc/stor-layout.c | 3 +-- 2 files changed, 1 insertion(+), 42 deletions(-) diff --git a/gcc/dwarf2out.c b/gcc/dwarf2out.c index 9357a100f6a..e50428e4e31 100644 --- a/gcc/dwarf2out.c +++ b/gcc/dwarf2out.c @@ -23293,46 +23293,6 @@ gen_field_die (tree decl, struct vlr_context *ctx, dw_die_ref context_die) equate_decl_number_to_die (decl, decl_die); } -#if 0 -/* Don't generate either pointer_type DIEs or reference_type DIEs here. - Use modified_type_die instead. - We keep this code here just in case these types of DIEs may be needed to - represent certain things in other languages (e.g. Pascal) someday. */ - -static void -gen_pointer_type_die (tree type, dw_die_ref context_die) -{ - dw_die_ref ptr_die - = new_die (DW_TAG_pointer_type, scope_die_for (type, context_die), type); - - equate_type_number_to_die (type, ptr_die); - add_type_attribute (ptr_die, TREE_TYPE (type), TYPE_UNQUALIFIED, false, - context_die); - add_AT_unsigned (mod_type_die, DW_AT_byte_size, PTR_SIZE); -} - -/* Don't generate either pointer_type DIEs or reference_type DIEs here. - Use modified_type_die instead. - We keep this code here just in case these types of DIEs may be needed to - represent certain things in other languages (e.g. Pascal) someday. */ - -static void -gen_reference_type_die (tree type, dw_die_ref context_die) -{ - dw_die_ref ref_die, scope_die = scope_die_for (type, context_die); - - if (TYPE_REF_IS_RVALUE (type) && dwarf_version >= 4) - ref_die = new_die (DW_TAG_rvalue_reference_type, scope_die, type); - else - ref_die = new_die (DW_TAG_reference_type, scope_die, type); - - equate_type_number_to_die (type, ref_die); - add_type_attribute (ref_die, TREE_TYPE (type), TYPE_UNQUALIFIED, false, - context_die); - add_AT_unsigned (mod_type_die, DW_AT_byte_size, PTR_SIZE); -} -#endif - /* Generate a DIE for a pointer to a member type. TYPE can be an OFFSET_TYPE, for a pointer to data member, or a RECORD_TYPE, for a pointer to member function. */ diff --git a/gcc/stor-layout.c b/gcc/stor-layout.c index 1574e4383e8..f733b1e4609 100644 --- a/gcc/stor-layout.c +++ b/gcc/stor-layout.c @@ -2647,8 +2647,7 @@ set_min_and_max_values_for_integral_type (tree type, /* Set the extreme values of TYPE based on its precision in bits, then lay it out. Used when make_signed_type won't do - because the tree code is not INTEGER_TYPE. - E.g. for Pascal, when the -fsigned-char option is given. */ + because the tree code is not INTEGER_TYPE. */ void fixup_signed_type (tree type) -- 2.13.2