diff options
Diffstat (limited to 'gcc/fortran/st.c')
| -rw-r--r-- | gcc/fortran/st.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fortran/st.c b/gcc/fortran/st.c index f9ad5d8..28d69b9 100644 --- a/gcc/fortran/st.c +++ b/gcc/fortran/st.c @@ -129,8 +129,8 @@ gfc_free_statement (gfc_code *p) case EXEC_SELECT: case EXEC_SELECT_TYPE: - if (p->ext.case_list) - gfc_free_case_list (p->ext.case_list); + if (p->ext.block.case_list) + gfc_free_case_list (p->ext.block.case_list); break; case EXEC_DO: |