aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/st.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/fortran/st.c')
-rw-r--r--gcc/fortran/st.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fortran/st.c b/gcc/fortran/st.c
index 866f9bf..d77ef81 100644
--- a/gcc/fortran/st.c
+++ b/gcc/fortran/st.c
@@ -80,8 +80,8 @@ gfc_append_code (gfc_code *tail, gfc_code *new_code)
void
gfc_free_statement (gfc_code *p)
{
- if (p->expr)
- gfc_free_expr (p->expr);
+ if (p->expr1)
+ gfc_free_expr (p->expr1);
if (p->expr2)
gfc_free_expr (p->expr2);