trans-stmt.c (gfc_trans_call): fix gcc_assert to a comparison, not an assignment.

2007-06-07  Dirk Mueller  <dmueller@suse.de>

        * trans-stmt.c (gfc_trans_call): fix gcc_assert to
        a comparison, not an assignment.

        * optabls.c (debug_optab_libfuncs): fix gcc_assert to
        a comparison, not an assignment.

From-SVN: r125647

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 7cb1cf2396cd44f7a2407ec4d0e29023f4b83cca..0cf693800d35c9b3d748ee2ca799b752cac1e651 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2007-06-12  Dirk Mueller  <dmueller@suse.de>
+
+       * trans-stmt.c (gfc_trans_call): fix gcc_assert to
+       a comparison, not an assignment.
+
 2007-06-12  Olivier Hainque  <hainque@adacore.com>
 
        * tree-nested.c (convert_local_reference): Handle VIEW_CONVERT_EXPR.

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 6a5f0cb7f7a763aebaf2ccdd1208dcd3a8802c2d..eacbda87a91bf48b642219fbbbd330a57bd470b6 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2007-06-12  Dirk Mueller  <dmueller@suse.de>
+
+       * optabls.c (debug_optab_libfuncs): fix gcc_assert to
+       a comparison, not an assignment.
+
 2007-06-12  Paul Thomas  <pault@gcc.gnu.org>
 
        * trans-common.c (create_common): Initialize 'field_init'.

diff --git a/gcc/fortran/trans-stmt.c b/gcc/fortran/trans-stmt.c
index 51586c8c895ce3fa98e5082df177388d12d2813b..abb53ef751524e60d0818f58067641c7e3eab815 100644 (file)
--- a/gcc/fortran/trans-stmt.c
+++ b/gcc/fortran/trans-stmt.c
@@ -387,8 +387,8 @@ gfc_trans_call (gfc_code * code, bool dependency_check)
        {
          gfc_symbol *sym;
          sym = code->resolved_sym;
-         gcc_assert (sym->formal->sym->attr.intent = INTENT_OUT);
-         gcc_assert (sym->formal->next->sym->attr.intent = INTENT_IN);
+         gcc_assert (sym->formal->sym->attr.intent == INTENT_OUT);
+         gcc_assert (sym->formal->next->sym->attr.intent == INTENT_IN);
          gfc_conv_elemental_dependencies (&se, &loopse, sym,
                                           code->ext.actual);
        }

diff --git a/gcc/optabs.c b/gcc/optabs.c
index e86ed62545b5ee6404d44f597152092326759761..dc097870ff8aa8620b253c7a66188e1125df5cc0 100644 (file)
--- a/gcc/optabs.c
+++ b/gcc/optabs.c
@@ -5833,7 +5833,7 @@ debug_optab_libfuncs (void)
        h = &o->handlers[j];
        if (h->libfunc)
          {
-           gcc_assert (GET_CODE (h->libfunc) = SYMBOL_REF);
+           gcc_assert (GET_CODE (h->libfunc) == SYMBOL_REF);
            fprintf (stderr, "%s\t%s:\t%s\n",
                     GET_RTX_NAME (o->code),
                     GET_MODE_NAME (j),
@@ -5853,7 +5853,7 @@ debug_optab_libfuncs (void)
          h = &o->handlers[j][k];
          if (h->libfunc)
            {
-             gcc_assert (GET_CODE (h->libfunc) = SYMBOL_REF);
+             gcc_assert (GET_CODE (h->libfunc) == SYMBOL_REF);
              fprintf (stderr, "%s\t%s\t%s:\t%s\n",
                       GET_RTX_NAME (o->code),
                       GET_MODE_NAME (j),