diff options
| -rw-r--r-- | gcc/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/varasm.c | 5 |
2 files changed, 8 insertions, 2 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 1ba3fac..9115041 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,8 @@ +2005-09-17 Eric Botcazou <ebotcazou@adacore.com> + + * varasm.c (output_constant): Do not abort on VIEW_CONVERT_EXPRs + between different sizes. + 2005-09-16 Paolo Bonzini <bonzini@gnu.org> PR 23903 diff --git a/gcc/varasm.c b/gcc/varasm.c index d0f7afc..a258c9e 100644 --- a/gcc/varasm.c +++ b/gcc/varasm.c @@ -3880,8 +3880,9 @@ output_constant (tree exp, unsigned HOST_WIDE_INT size, unsigned int align) HOST_WIDE_INT type_size = int_size_in_bytes (TREE_TYPE (exp)); HOST_WIDE_INT op_size = int_size_in_bytes (TREE_TYPE (TREE_OPERAND (exp, 0))); - /* Make sure eliminating the conversion is really a no-op. */ - if (type_size != op_size) + /* Make sure eliminating the conversion is really a no-op, except with + VIEW_CONVERT_EXPR to allow for wild Ada unchecked conversions. */ + if (type_size != op_size && TREE_CODE (exp) != VIEW_CONVERT_EXPR) internal_error ("no-op convert from %wd to %wd bytes in initializer", op_size, type_size); |