CLEANUP: batchtools registry is only created and the finalizer is only registered when the future is launched

Author: HenrikBengtsson

.Rbuildignore

@@ -5,6 +5,7 @@
 ^.git
 ^.github
 ^.make
+^.local
 ^INSTALL[.]md$
 ^OVERVIEW[.]md$
 ^README[.]md$

.gitignore

@@ -17,6 +17,7 @@
 .ghi
 .issues
 .make
+.local
 revdep/data.sqlite
 revdep/checks/*
 revdep/library/*

NEWS

@@ -1,7 +1,12 @@
 Package: future.batchtools
 ==========================
 
-Version: 0.9.0-9000 [2020-12-21]
+Version: 0.9.0-9000 [2020-12-23]
+
+SIGNIFICANT CHANGES:
+
+ * Lazy batchtools futures only creates the internal batchtools registry when
+   the future is launched.
 
 DOCUMENTATION:
 

R/BatchtoolsFuture-class.R

@@ -127,28 +127,18 @@ as_BatchtoolsFuture <- function(future,
 
   stop_if_not(is.list(resources))
 
-  ## Create batchtools registry
-  reg <- temp_registry(
-    label = future$label,
+  ## batchtools configuration
+  future$config <- list(
+    reg = NULL,
+    jobid = NA_integer_,
+    resources = resources,
     conf.file = conf.file,
     cluster.functions = cluster.functions,
-    config = registry
+    registry = registry,
+    finalize = finalize
   )
-  debug <- getOption("future.debug", FALSE)
-  if (debug) mprint(reg)
-
-  ## batchtools configuration
-  config <- list(reg = reg, jobid = NA_integer_,
-                 resources = resources)
 
-  future$config <- config
-
-  future <- structure(future, class = c("BatchtoolsFuture", class(future)))
-
-  ## Register finalizer?
-  if (finalize) future <- add_finalizer(future, debug = debug)
-
-  future
+  structure(future, class = c("BatchtoolsFuture", class(future)))
 }