Avoid memory leak with in R_mongo_get_default_database (#159)

Adds the proper call to avoid a memory leak.
jeroen · Oct 22, 2018 · 26df60d · 26df60d
1 parent 8f29f1e
commit 26df60d
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/src/collection.c b/src/collection.c
@@ -11,7 +11,9 @@ SEXP R_mongo_get_default_database(SEXP ptr_client) {
   mongoc_client_t *client = r2client(ptr_client);
   mongoc_database_t *db = mongoc_client_get_default_database(client);
   if(db){
-    return Rf_mkString(mongoc_database_get_name(db));
+    SEXP out = Rf_mkString(mongoc_database_get_name(db));
+    mongoc_database_destroy(db);
+    return out;
   } else {
     return R_NilValue;
   }