From 09d9b3f79e92dffb512d699545c44c6c5a46b0f3 Mon Sep 17 00:00:00 2001 From: Dirk Eddelbuettel Date: Tue, 25 May 2021 14:10:32 -0500 Subject: [PATCH] call vacuum instead of consolidate --- R/TileDBArray.R | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/R/TileDBArray.R b/R/TileDBArray.R index bea45da578..63092b2d52 100644 --- a/R/TileDBArray.R +++ b/R/TileDBArray.R @@ -1145,9 +1145,9 @@ array_consolidate <- function(uri, cfg = NULL, ctx = tiledb_get_context()) { #' @return \code{NULL} is returned invisibly #' @export array_vacuum <- function(uri, cfg = NULL, ctx = tiledb_get_context()) { - libtiledb_array_consolidate(ctx = ctx@ptr, uri = uri, - # C++ code has Nullable and can instantiate but needs S4 XPtr - cfgptr = if (is.null(cfg)) cfg else cfg@ptr) + libtiledb_array_vacuum(ctx = ctx@ptr, uri = uri, + # C++ code has Nullable and can instantiate but needs S4 XPtr + cfgptr = if (is.null(cfg)) cfg else cfg@ptr) } #' Get the non-empty domain from a TileDB Array by index