* gcc-interface/ada-tree.h (TYPE_DEBUG_TYPE): Remove duplicate.

From-SVN: r231823

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 0ad84e2bb763f6d72429cd0c818caf7dfc21582f..bdd5341b62d5a700a06b543e187272a082651ad4 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2015-12-18  Eric Botcazou  <ebotcazou@adacore.com>
+
+       * gcc-interface/ada-tree.h (TYPE_DEBUG_TYPE): Remove duplicate.
+
 2015-12-17  Pierre-Marie de Rodat  <derodat@adacore.com>
 
        * gcc-interface/ada-tree.h

diff --git a/gcc/ada/gcc-interface/ada-tree.h b/gcc/ada/gcc-interface/ada-tree.h
index 830062791b9734c62d0e839ca0a1441c6f8d0d49..715fbadc968d5840c544150bfb6b3dceba31df1a 100644 (file)
--- a/gcc/ada/gcc-interface/ada-tree.h
+++ b/gcc/ada/gcc-interface/ada-tree.h
@@ -369,13 +369,6 @@ do {                                                  \
 #define SET_TYPE_ADA_SIZE(NODE, X) \
   SET_TYPE_LANG_SPECIFIC (RECORD_OR_UNION_CHECK (NODE), X)
 
-/* For types with TYPE_CAN_HAVE_DEBUG_TYPE_P, this is the type to use in
-   debugging information.  */
-#define TYPE_DEBUG_TYPE(NODE) \
-  GET_TYPE_LANG_SPECIFIC2(NODE)
-#define SET_TYPE_DEBUG_TYPE(NODE, X) \
-  SET_TYPE_LANG_SPECIFIC2(NODE, X)
-
 /* For an INTEGER_TYPE with TYPE_IS_FIXED_POINT_P, this is the value of the
    scale factor.  Modular types, index types (sizetype subtypes) and
    fixed-point types are totally distinct types, so there is no problem with
@@ -388,17 +381,17 @@ do {                                                 \
 /* For types with TYPE_CAN_HAVE_DEBUG_TYPE_P, this is the type to use in
    debugging information.  */
 #define TYPE_DEBUG_TYPE(NODE) \
-  GET_TYPE_LANG_SPECIFIC2(NODE)
+  GET_TYPE_LANG_SPECIFIC2 (NODE)
 #define SET_TYPE_DEBUG_TYPE(NODE, X) \
-  SET_TYPE_LANG_SPECIFIC2(NODE, X)
+  SET_TYPE_LANG_SPECIFIC2 (NODE, X)
 
 /* For types with TYPE_IMPLEMENTS_PACKED_ARRAY_P, this is the original packed
    array type.  Note that this predicate is trou for original packed array
    types, so these cannot have a debug type.  */
 #define TYPE_ORIGINAL_PACKED_ARRAY(NODE) \
-  GET_TYPE_LANG_SPECIFIC2(NODE)
+  GET_TYPE_LANG_SPECIFIC2 (NODE)
 #define SET_TYPE_ORIGINAL_PACKED_ARRAY(NODE, X) \
-  SET_TYPE_LANG_SPECIFIC2(NODE, X)
+  SET_TYPE_LANG_SPECIFIC2 (NODE, X)
 
 
 /* Flags added to decl nodes.  */