Index: c/Objects/compactobject.c =================================================================== RCS file: /cvsroot/psyco/psyco/c/Objects/compactobject.c,v retrieving revision 1.1 diff -u -r1.1 compactobject.c --- c/Objects/compactobject.c 11 Aug 2004 23:03:38 -0000 1.1 +++ c/Objects/compactobject.c 20 Aug 2004 09:58:17 -0000 @@ -532,6 +532,12 @@ /*****************************************************************/ +static PyObject* allocfunc_(struct _typeobject * to_, int s_) { + return PyType_GenericAlloc(to_, s_); +} +static void freefunc_(void * o_) { + PyObject_GC_Del(o_); +} DEFINEVAR compact_impl_t* PyCompact_EmptyImpl; @@ -575,9 +581,9 @@ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ - PyType_GenericAlloc, /* tp_alloc */ + allocfunc_, /*PyType_GenericAlloc, tp_alloc */ compact_new, /* tp_new */ - PyObject_GC_Del, /* tp_free */ + freefunc_, /*PyObject_GC_Del, tp_free */ }; void psyco_compact_init(void)