1 files changed, 2 insertions, 1 deletions

diff --git a/src/alloc.c b/src/alloc.c
index 6701bf002b7..bde0a16ac15 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -3153,7 +3153,8 @@ cleanup_vector (struct Lisp_Vector *vector)
     {
       struct Lisp_Native_Comp_Unit *cu =
         PSEUDOVEC_STRUCT (vector, Lisp_Native_Comp_Unit);
-      dispose_comp_unit (cu, true);
+      eassert (cu->handle);
+      dynlib_close (cu->handle);
     }
   else if (NATIVE_COMP_FLAG
            && PSEUDOVECTOR_TYPEP (&vector->header, PVEC_SUBR))