scratch/igc b166943118c 1/2: Reduce the number of leaked roots (Bug#75477)

[Pip Cet]

branch: scratch/igc
commit b166943118cf8467588fb6acaf757ee99237e998
Author: Pip Cet <pipcet@protonmail.com>
Commit: Pip Cet <pipcet@protonmail.com>

    Reduce the number of leaked roots (Bug#75477)
    
    * src/lisp.h (safe_free): Call the right free function, not 'xfree'.
---
 src/lisp.h | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/lisp.h b/src/lisp.h
index d57cf0f41dc..cb6d84cee71 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -6179,7 +6179,7 @@ safe_free (specpdl_ref sa_count)
 #else
          eassert (specpdl_ptr->unwind_ptr.func == xfree);
 #endif
-         xfree (specpdl_ptr->unwind_ptr.arg);
+         specpdl_ptr->unwind_ptr.func (specpdl_ptr->unwind_ptr.arg);
        }
       else
        {