diff options
author | Harald Anlauf <anlauf@gmx.de> | 2021-06-16 22:00:52 +0200 |
---|---|---|
committer | Harald Anlauf <anlauf@gmx.de> | 2021-06-16 22:00:52 +0200 |
commit | d117f992d81b783aa7cbff4c9fde9b96b70a93ed (patch) | |
tree | a4460d7256782b6ad7c8c078f0bca319cbfc34f7 /gcc/fortran/parse.c | |
parent | 72e3d92178b44a3722519ec68e72e307443bda70 (diff) | |
download | gcc-d117f992d81b783aa7cbff4c9fde9b96b70a93ed.zip gcc-d117f992d81b783aa7cbff4c9fde9b96b70a93ed.tar.gz gcc-d117f992d81b783aa7cbff4c9fde9b96b70a93ed.tar.bz2 |
Revert "Fortran - ICE in gfc_check_do_variable, at fortran/parse.c:4446"
This reverts commit 72e3d92178b44a3722519ec68e72e307443bda70.
Diffstat (limited to 'gcc/fortran/parse.c')
-rw-r--r-- | gcc/fortran/parse.c | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/gcc/fortran/parse.c b/gcc/fortran/parse.c index 6d7845e..0522b39 100644 --- a/gcc/fortran/parse.c +++ b/gcc/fortran/parse.c @@ -4588,9 +4588,6 @@ gfc_check_do_variable (gfc_symtree *st) { gfc_state_data *s; - if (!st) - return 0; - for (s=gfc_state_stack; s; s = s->previous) if (s->do_variable == st) { |