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.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/fortran/st.c b/gcc/fortran/st.c
index 790dec6..81d861a 100644
--- a/gcc/fortran/st.c
+++ b/gcc/fortran/st.c
@@ -108,6 +108,8 @@ gfc_free_statement (gfc_code *p)
case EXEC_ARITHMETIC_IF:
break;
+ case EXEC_COMPCALL:
+ gfc_free_expr (p->expr);
case EXEC_CALL:
case EXEC_ASSIGN_CALL:
gfc_free_actual_arglist (p->ext.actual);