Fix logic error in Fortran OpenACC parsing

	gcc/fortran/
	* parse.c (parse_oacc_structured_block): Fix logic error.
	Reported by Mikael Morin <mikael.morin@sfr.fr>.

From-SVN: r226246

gcc/fortran/ChangeLog

+2015-07-27  Thomas Schwinge  <thomas@codesourcery.com>
+
+	* parse.c (parse_oacc_structured_block): Fix logic error.
+	Reported by Mikael Morin <mikael.morin@sfr.fr>.
+
 2015-07-24  Mikael Morin  <mikael@gcc.gnu.org>
 
 	PR fortran/64986

gcc/fortran/parse.c

@@ -4383,8 +4383,10 @@ parse_oacc_structured_block (gfc_statement acc_st)
       if (st == ST_NONE)
 	unexpected_eof ();
       else if (st != acc_end_st)
-	gfc_error ("Expecting %s at %C", gfc_ascii_statement (acc_end_st));
-      reject_statement ();
+	{
+	  gfc_error ("Expecting %s at %C", gfc_ascii_statement (acc_end_st));
+	  reject_statement ();
+	}
     }
   while (st != acc_end_st);