Add .onUnload function.

jlmelville · Oct 20, 2018 · 11d2829 · 11d2829
1 parent c78071d
commit 11d2829
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/R/hnsw.R b/R/hnsw.R
@@ -96,3 +96,7 @@ get_knn <- function(X, k = 10, distance = "euclidean", include_self = TRUE,
 
   list(idx = idx, dist = dist)
 }
+
+.onUnload <- function(libpath) {
+  library.dynam.unload("RcppHNSW", libpath)
+}