diff options
| author | Steven Bosscher <steven@gcc.gnu.org> | 2010-05-20 20:57:45 +0000 |
|---|---|---|
| committer | Steven Bosscher <steven@gcc.gnu.org> | 2010-05-20 20:57:45 +0000 |
| commit | a48ba7e10b954685dca91cf39163fa03d68d29b1 (patch) | |
| tree | 82a4f8acb3e53939dff81f7e4b05a9e9f4416461 /gcc/fortran/trans-expr.c | |
| parent | 69610617532427076944e5bdb0e723ee81b5655c (diff) | |
| download | gcc-a48ba7e10b954685dca91cf39163fa03d68d29b1.zip gcc-a48ba7e10b954685dca91cf39163fa03d68d29b1.tar.gz gcc-a48ba7e10b954685dca91cf39163fa03d68d29b1.tar.bz2 | |
trans-expr.c: Do not include convert.h, ggc.h, real.h, and gimple.h.
* trans-expr.c: Do not include convert.h, ggc.h, real.h, and gimple.h.
(gfc_conv_string_tmp): Do not assert type comparibilty.
* trans-array.c: Do not include gimple.h, ggc.h, and real.h.
(gfc_conv_expr_descriptor): Remove assert.
* trans-common.c: Clarify why rtl.h and tm.h are included.
* trans-openmp.c: Do not include ggc.h and real.h.
Explain why gimple.h is included.
* trans-const.c: Do not include ggc.h.
* trans-stmt.c: Do not include gimple.h, ggc.h, and real.h.
* trans.c: Do not include ggc.h and real.h.
Explain why gimple.h is included.
* trans-types.c: Do not include tm.h. Explain why langhooks.h
and dwarf2out.h are included.
* trans-io.c: Do not include gimple.h and real.h.
* trans-decl.c: Explain why gimple.h, tm.h, and rtl.h are included.
* trans-intrinsic.c: Do not include gimple.h. Explain why tm.h
is included.
From-SVN: r159640
Diffstat (limited to 'gcc/fortran/trans-expr.c')
| -rw-r--r-- | gcc/fortran/trans-expr.c | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/gcc/fortran/trans-expr.c b/gcc/fortran/trans-expr.c index b7a296d..b76a324 100644 --- a/gcc/fortran/trans-expr.c +++ b/gcc/fortran/trans-expr.c @@ -26,11 +26,7 @@ along with GCC; see the file COPYING3. If not see #include "system.h" #include "coretypes.h" #include "tree.h" -#include "convert.h" -#include "ggc.h" #include "toplev.h" -#include "real.h" -#include "gimple.h" #include "langhooks.h" #include "flags.h" #include "gfortran.h" @@ -1115,8 +1111,6 @@ gfc_conv_string_tmp (gfc_se * se, tree type, tree len) tree var; tree tmp; - gcc_assert (types_compatible_p (TREE_TYPE (len), gfc_charlen_type_node)); - if (gfc_can_put_var_on_stack (len)) { /* Create a temporary variable to hold the result. */ |