diff options
author | pbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-09-08 14:33:03 +0000 |
---|---|---|
committer | pbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-09-08 14:33:03 +0000 |
commit | 22d678e818e4cd9b7fe186fa0725a900df3f4db3 (patch) | |
tree | a38df818a0e3b820f84fcfd17398ee161742aa6c /gcc/fortran/trans-common.c | |
parent | b98fea5c1220e51f32afa42572c87eefb7f52760 (diff) | |
download | gcc-22d678e818e4cd9b7fe186fa0725a900df3f4db3.tar.gz |
* array.c: Don't include assert.h.
* data.c: Don't include assert.h. Replace assert and abort with
gcc_assert and gcc_unreachable.
* dependency.c: Ditto.
* f95-lang.c: Ditto.
* iresolve.c: Ditto.
* resolve.c: Ditto.
* simplify.c: Ditto.
* symbol.c: Ditto.
* trans-array.c: Ditto.
* trans-common.c: Ditto.
* trans-const.c: Ditto.
* trans-decl.c: Ditto.
* trans-expr.c: Ditto.
* trans-intrinsic.c: Ditto.
* trans-io.c: Ditto.
* trans-stmt.c: Ditto.
* trans-types.c: Ditto.
* trans.c: Ditto.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@87187 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/trans-common.c')
-rw-r--r-- | gcc/fortran/trans-common.c | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/gcc/fortran/trans-common.c b/gcc/fortran/trans-common.c index f9db554337f..f692f3eee22 100644 --- a/gcc/fortran/trans-common.c +++ b/gcc/fortran/trans-common.c @@ -103,7 +103,6 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA #include "trans.h" #include "trans-types.h" #include "trans-const.h" -#include <assert.h> /* Holds a single variable in a equivalence set. */ @@ -414,7 +413,7 @@ create_common (gfc_common_head *com) offset = s->offset + s->length; } } - assert (list); + gcc_assert (list); ctor = build1 (CONSTRUCTOR, union_type, nreverse(list)); TREE_CONSTANT (ctor) = 1; TREE_INVARIANT (ctor) = 1; @@ -423,7 +422,7 @@ create_common (gfc_common_head *com) #ifdef ENABLE_CHECKING for (tmp = CONSTRUCTOR_ELTS (ctor); tmp; tmp = TREE_CHAIN (tmp)) - assert (TREE_CODE (TREE_PURPOSE (tmp)) == FIELD_DECL); + gcc_assert (TREE_CODE (TREE_PURPOSE (tmp)) == FIELD_DECL); #endif } |