diff --git a/gdb/value.c b/gdb/value.c
index 8b8b5c8..e36feaf 100644
--- a/gdb/value.c
+++ b/gdb/value.c
@@ -2322,6 +2322,10 @@ clear_internalvar (struct internalvar *var)
       xfree (var->u.string);
       break;
 
+    case INTERNALVAR_FUNCTION:
+      delete var->u.fn.function;
+      break;
+
     default:
       break;
     }