From 38d9cc1278541b84202c4b3e1555b6d2e36beaca Mon Sep 17 00:00:00 2001 From: NotZed Date: Tue, 2 May 2000 22:02:49 +0000 Subject: Free the parse tree if we have one. (e_sexp_parse): If we already have a 2000-05-02 NotZed * e-sexp.c (e_sexp_finalise): Free the parse tree if we have one. (e_sexp_parse): If we already have a parse tree, free it. svn path=/trunk/; revision=2757 --- e-util/ChangeLog | 5 +++++ e-util/e-sexp.c | 21 +++++++++++++++++++++ 2 files changed, 26 insertions(+) diff --git a/e-util/ChangeLog b/e-util/ChangeLog index aa338ae2c4..f70ca5ec1c 100644 --- a/e-util/ChangeLog +++ b/e-util/ChangeLog @@ -1,3 +1,8 @@ +2000-05-02 NotZed + + * e-sexp.c (e_sexp_finalise): Free the parse tree if we have one. + (e_sexp_parse): If we already have a parse tree, free it. + 2000-05-02 Matt Loper * Makefile.am: set G_LOG_DOMAIN. diff --git a/e-util/e-sexp.c b/e-util/e-sexp.c index ad36c368bf..0f9abc636a 100644 --- a/e-util/e-sexp.c +++ b/e-util/e-sexp.c @@ -869,12 +869,17 @@ camel_mbox_folder_search_by_expression(CamelFolder *folder, char *expression, Ca #endif +static void e_sexp_finalise(GtkObject *); + static void e_sexp_class_init (ESExpClass *class) { GtkObjectClass *object_class; object_class = (GtkObjectClass *) class; + + object_class->finalize = e_sexp_finalise; + parent_class = gtk_type_class (gtk_object_get_type ()); } @@ -897,6 +902,19 @@ static struct { { "begin", (ESExpFunc *)term_eval_begin, 1 }, }; +static void +e_sexp_finalise(GtkObject *o) +{ + ESExp *s = (ESExp *)o; + + if (s->tree) { + parse_term_free(s->tree); + s->tree = NULL; + } + + ((GtkObjectClass *)(parent_class))->finalize((GtkObject *)o); +} + static void e_sexp_init (ESExp *s) { @@ -1041,6 +1059,9 @@ e_sexp_parse(ESExp *f) { g_return_if_fail(FILTER_IS_SEXP(f)); + if (f->tree) + parse_term_free(f->tree); + f->tree = parse_list(f, FALSE); if (f->tree) -- cgit v1.2.3