diff src/animate.c @ 124:ad5ab8e61c2b

Free subject of complete when a program is freed
author Thinker K.F. Li <thinker@branda.to>
date Tue, 16 Sep 2008 14:55:24 +0800
parents 9e2316dc6ecb
children 07dc9ec71221
line wrap: on
line diff
--- a/src/animate.c	Tue Sep 16 14:19:26 2008 +0800
+++ b/src/animate.c	Tue Sep 16 14:55:24 2008 +0800
@@ -135,6 +135,7 @@
     int n_words;
     mb_word_t *word;
     mb_action_t *cur_act;
+    ob_factory_t *factory;
     int i;
 
     n_words = progm->n_words;
@@ -147,6 +148,10 @@
 	    cur_act->free(cur_act);
 	}
     }
+
+    factory = rdman_get_ob_factory(progm->rdman);
+    subject_free(factory, progm->complete);
+
     free(progm);
 }