diff options
| author | tobi <tobi@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-07-10 21:52:20 +0000 |
|---|---|---|
| committer | tobi <tobi@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-07-10 21:52:20 +0000 |
| commit | 95d044d2cf70f4642d86615af18156ea7fe40dd7 (patch) | |
| tree | a685485e5068ab2d9d41fe6f80270f58d05dbcad /gcc | |
| parent | 1a02cdac92e8b54ce154ea8196394cbb35b6db5a (diff) | |
| download | ppe42-gcc-95d044d2cf70f4642d86615af18156ea7fe40dd7.tar.gz ppe42-gcc-95d044d2cf70f4642d86615af18156ea7fe40dd7.zip | |
* parse.c (decode_statement): Fix matching of BLOCK DATA.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@84474 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/fortran/ChangeLog | 2 | ||||
| -rw-r--r-- | gcc/fortran/parse.c | 2 |
2 files changed, 3 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index ded551cb2d6..fe6c6649293 100644 --- 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 diff --git a/gcc/fortran/parse.c b/gcc/fortran/parse.c index 15a53ea3e45..1295fb0e5f9 100644 --- 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': |
