diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2011-03-17 12:37:53 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2011-03-17 12:37:53 +0000 |
| commit | bb1f792960e1dd896529286d2d2302491959d591 (patch) | |
| tree | 0f84b2c4de3fdba8e07cd150c30e22214ec75896 /gcc/ada/gcc-interface/gigi.h | |
| parent | dabd47e701a73fca7f4e2495b5a86704bf0a1855 (diff) | |
| download | gcc-bb1f792960e1dd896529286d2d2302491959d591.zip gcc-bb1f792960e1dd896529286d2d2302491959d591.tar.gz gcc-bb1f792960e1dd896529286d2d2302491959d591.tar.bz2 | |
gigi.h (smaller_form_type_p): Declare.
* gcc-interface/gigi.h (smaller_form_type_p): Declare.
* gcc-interface/trans.c (smaller_form_type_p): Make global and move...
* gcc-interface/utils.c (smaller_form_type_p): ...to here.
(convert): Deal with conversions from a smaller form type specially.
From-SVN: r171091
Diffstat (limited to 'gcc/ada/gcc-interface/gigi.h')
| -rw-r--r-- | gcc/ada/gcc-interface/gigi.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/gcc/ada/gcc-interface/gigi.h b/gcc/ada/gcc-interface/gigi.h index e45cf13..2605533 100644 --- a/gcc/ada/gcc-interface/gigi.h +++ b/gcc/ada/gcc-interface/gigi.h @@ -756,6 +756,9 @@ extern bool is_double_scalar_or_array (Entity_Id gnat_type, component of an aggregate type. */ extern bool type_for_nonaliased_component_p (tree gnu_type); +/* Return true if TYPE is a smaller form of ORIG_TYPE. */ +extern bool smaller_form_type_p (tree type, tree orig_type); + /* Return the base type of TYPE. */ extern tree get_base_type (tree type); |