re PR fortran/34907 (valgrind error indication from testsuite trans-types.c: gfc_typenode_for_spec)

2008-01-22  Tobias Burnus  <burnus@net-b.de>

       PR fortran/34907
       * parse.c (parse_spec): Change = into ==.

From-SVN: r131728
This commit is contained in:
Tobias Burnus 2008-01-22 17:43:20 +01:00 committed by Tobias Burnus
parent e94384dbd6
commit 2ddd287108
2 changed files with 6 additions and 1 deletions

View file

@ -1,3 +1,8 @@
2008-01-22 Tobias Burnus <burnus@net-b.de>
PR fortran/34907
* parse.c (parse_spec): Change = into ==.
2008-01-22 Daniel Franke <franke.daniel@gmail.com>
PR fortran/34915

View file

@ -2189,7 +2189,7 @@ loop:
gfc_current_block ()->ts.kind = 0;
/* Keep the derived type; if it's bad, it will be discovered later. */
if (!(ts->type = BT_DERIVED && ts->derived))
if (!(ts->type == BT_DERIVED && ts->derived))
ts->type = BT_UNKNOWN;
}