Fix pad status check.

2014-09-10  Janne Blomqvist  <jb@gcc.gnu.org>

	* io/transfer.c (read_block_form): Fix pad status check (found by
	Thomas Schwinge with -Wlogical-not-parentheses).

From-SVN: r215092
This commit is contained in:
Janne Blomqvist 2014-09-10 00:23:25 +03:00
parent 4abf82644e
commit 00c7a3c72a
2 changed files with 6 additions and 1 deletions

View file

@ -1,3 +1,8 @@
2014-09-10 Janne Blomqvist <jb@gcc.gnu.org>
* io/transfer.c (read_block_form): Fix pad status check (found by
Thomas Schwinge with -Wlogical-not-parentheses).
2014-08-31 Tobias Burnus <burnus@net-b.de>
* caf/libcaf.h (_gfortran_caf_send, _gfortran_caf_get,

View file

@ -475,7 +475,7 @@ read_block_form (st_parameter_dt *dtp, int * nbytes)
if (norig != *nbytes)
{
/* Short read, this shouldn't happen. */
if (!dtp->u.p.current_unit->pad_status == PAD_YES)
if (dtp->u.p.current_unit->pad_status == PAD_NO)
{
generate_error (&dtp->common, LIBERROR_EOR, NULL);
source = NULL;