mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-07 20:30:32 -08:00
Code Issues Projects Releases Wiki Activity

* src/alloc.c: call only non-null finalizers

Browse source
This commit is contained in:
Aurelien Aptel 2016-09-30 14:00:51 +02:00
parent 6133d656d0
commit d9ce9c8f4f
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/alloc.c
View file

@ -6907,7 +6907,8 @@ sweep_misc (void)
else if (mblk->markers[i].m.u_any.type == Lisp_Misc_User_Ptr)
{
struct Lisp_User_Ptr *uptr = &mblk->markers[i].m.u_user_ptr;
uptr->finalizer (uptr->p);
if (uptr->finalizer)
uptr->finalizer (uptr->p);
}
#endif
/* Set the type of the freed object to Lisp_Misc_Free.