* parse.c (decode_statement): Fix matching of BLOCK DATA.

From-SVN: r84474

* parse.c (decode_statement): Fix matching of BLOCK DATA.
From-SVN: r84474
24727d92 · Tobias Schlüter · Tobias Schlüter · f183d374 · 24727d92 · 24727d92
Commit 24727d92 authored Jul 10, 2004 by Tobias Schlüter Committed by Tobias Schlüter Jul 10, 2004
Hide whitespace changes
Inline Side-by-side

Showing with 3 additions and 1 deletions

gcc/fortran/ChangeLog
+2 -0

gcc/fortran/parse.c
+1 -1

No files found.
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -10,6 +10,8 @@
 	* trans-expr.c (gfc_conv_structure): Handle initialization
 	of scalar pointer components.

+	* parse.c (decode_statement): Fix matching of BLOCK DATA.
+
 2004-07-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>

 	* trans-common.c: Fix whitespace issues, make variable names

--- a/gcc/fortran/parse.c
+++ b/gcc/fortran/parse.c
@@ -178,7 +178,7 @@ decode_statement (void)

    case 'b':
      match ("backspace", gfc_match_backspace, ST_BACKSPACE);
-      match ("block data% ", gfc_match_block_data, ST_BLOCK_DATA);
+      match ("block data", gfc_match_block_data, ST_BLOCK_DATA);
      break;

    case 'c':