diff options
| -rw-r--r-- | gcc/f/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/f/com.c | 3 |
2 files changed, 5 insertions, 2 deletions
diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog index b0fa255dc9c..e1e4f83c42c 100644 --- a/gcc/f/ChangeLog +++ b/gcc/f/ChangeLog @@ -1,3 +1,7 @@ +2001-10-24 Toon Moene <toon@moene.indiv.nluug.nl> + + * com.c (ffecom_check_size_overflow_): Only check for TREE_OVERFLOW. + Tue Oct 23 14:01:27 2001 Richard Kenner <kenner@vlsi1.ultra.nyu.edu> * com.c (LANG_HOOKS_GET_ALIAS_SET): New macro. diff --git a/gcc/f/com.c b/gcc/f/com.c index ccff61a9d68..a5df6f7db2d 100644 --- a/gcc/f/com.c +++ b/gcc/f/com.c @@ -2266,8 +2266,7 @@ ffecom_check_size_overflow_ (ffesymbol s, tree type, bool dummy) return type; if ((tree_int_cst_sgn (TYPE_SIZE (type)) < 0) - || (!dummy && (((TREE_INT_CST_HIGH (TYPE_SIZE (type)) != 0)) - || TREE_OVERFLOW (TYPE_SIZE (type))))) + || (!dummy && TREE_OVERFLOW (TYPE_SIZE (type)))) { ffebad_start (FFEBAD_ARRAY_LARGE); ffebad_string (ffesymbol_text (s)); |
