[Emacs-diffs] master d9ce9c8: * src/alloc.c: call only non-null finalizers

[Aurélien Aptel]

branch: master
commit d9ce9c8f4fb9fb96e4ff4fcab7d057031d2b523a
Author: Aurelien Aptel <address@hidden>
Commit: Aurelien Aptel <address@hidden>

    * src/alloc.c: call only non-null finalizers
---
 src/alloc.c |    3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/alloc.c b/src/alloc.c
index 41b2f9e..8dae6bf 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -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.