* clmodule.c (doParams): free PVbuffer in error condition.

* frameobject.c (newframeobject): initialize ob_type if taking entry from the free list, since it is zeroed out when DEBUG is defined.
pablogsal · Aug 3, 1993 · f64992e · f64992e
1 parent d29eb62
commit f64992e
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 1 deletion.
diff --git a/Modules/clmodule.c b/Modules/clmodule.c
@@ -365,8 +365,10 @@ doParams(clobject *self, object *args, int (*func)(CL_Handle, int *, int),
 
 	error_handler_called = 0;
 	(*func)(self->ob_compressorHdl, PVbuffer, length);
-	if (error_handler_called)
+	if (error_handler_called) {
+		DEL(PVbuffer);
 		return NULL;
+	}
 
 	if (modified) {
 		for (i = 0; i < length; i++) {

diff --git a/Objects/frameobject.c b/Objects/frameobject.c
@@ -137,6 +137,7 @@ newframeobject(back, code, globals, locals, owner, nvalues, nblocks)
 	else {
 		f = free_list;
 		free_list = free_list->f_back;
+		f->ob_type = &Frametype;
 		NEWREF(f);
 	}
 	if (f != NULL) {