aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEric Botcazou <ebotcazou@adacore.com>2015-06-03 09:28:07 +0000
committerEric Botcazou <ebotcazou@gcc.gnu.org>2015-06-03 09:28:07 +0000
commit4b7bd26024608d543fb33dce0801b9b8c266f15f (patch)
tree4257e59288ea9bd181dd42b83c8c5f934f87c1f8
parentd020df06a7becb7e344e3ad39ca98338952c6f3d (diff)
downloadgcc-4b7bd26024608d543fb33dce0801b9b8c266f15f.zip
gcc-4b7bd26024608d543fb33dce0801b9b8c266f15f.tar.gz
gcc-4b7bd26024608d543fb33dce0801b9b8c266f15f.tar.bz2
* gcc-interface/utils.c (copy_type): Also set TYPE_CANONICAL.
From-SVN: r224068
-rw-r--r--gcc/ada/ChangeLog4
-rw-r--r--gcc/ada/gcc-interface/utils.c1
2 files changed, 5 insertions, 0 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index dc85f3b..a47a949 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,5 +1,9 @@
2015-06-03 Eric Botcazou <ebotcazou@adacore.com>
+ * gcc-interface/utils.c (copy_type): Also set TYPE_CANONICAL.
+
+2015-06-03 Eric Botcazou <ebotcazou@adacore.com>
+
* gcc-interface/trans.c (gnat_to_gnu) <N_Simple_Return_Statement>: Fix
typo in latest change.
diff --git a/gcc/ada/gcc-interface/utils.c b/gcc/ada/gcc-interface/utils.c
index 77d00b3..697b92e 100644
--- a/gcc/ada/gcc-interface/utils.c
+++ b/gcc/ada/gcc-interface/utils.c
@@ -2191,6 +2191,7 @@ copy_type (tree type)
TYPE_REFERENCE_TO (new_type) = 0;
TYPE_MAIN_VARIANT (new_type) = new_type;
TYPE_NEXT_VARIANT (new_type) = 0;
+ TYPE_CANONICAL (new_type) = new_type;
return new_type;
}