req nanonext 0.10.0

DESCRIPTION

@@ -1,7 +1,7 @@
 Package: mirai
 Type: Package
 Title: Minimalist Async Evaluation Framework for R
-Version: 0.9.1.9017
+Version: 0.9.1.9018
 Description: Lightweight parallel code execution and distributed computing.
     Designed for simplicity, a 'mirai' evaluates an R expression asynchronously,
     on local or network resources, resolving automatically upon completion.
@@ -23,5 +23,5 @@ Encoding: UTF-8
 Depends: 
     R (>= 3.5)
 Imports: 
-    nanonext (>= 0.9.2)
+    nanonext (>= 0.10.0)
 RoxygenNote: 7.2.3

NEWS.md

@@ -1,4 +1,4 @@
-# mirai 0.9.1.9017 (development)
+# mirai 0.9.1.9018 (development)
 
 * Previously deprecated function `server()` is removed in favour of `daemon()`.
 * Dispatcher enhancements and fixes:
@@ -15,8 +15,8 @@
 * Improved shell quoting of daemon launch commands makes it easier to deploy manually via `launch_remote()`.
 * The class `miraiInterrupt` has been retired and interrupts now generate a `miraiError` with an empty value.
 * Certain error messages are more accurate and informative.
-* General performance improvements through updates in nanonext v[0.9.2].
-* Requires nanonext >= [0.9.2] and R >= 3.5.
+* General performance improvements through updates in nanonext 0.10.0.
+* Requires nanonext >= 0.10.0 and R >= 3.5.
 
 # mirai 0.9.1
 

R/mirai.R

@@ -120,7 +120,7 @@ daemon <- function(url, asyncdial = FALSE, maxtasks = Inf, idletime = Inf,
     if (cleanup %% 2L) rm(list = names(.GlobalEnv), envir = .GlobalEnv)
     if (clr & as.raw(2L)) lapply((new <- search())[!new %in% se], detach, unload = TRUE, character.only = TRUE)
     if (clr & as.raw(4L)) options(op)
-    if (cleanup >= 8L) gc(verbose = FALSE)
+    if (clr & as.raw(8L)) gc(verbose = FALSE)
     if (count < timerstart) start <- mclock()
     count <- count + 1L
 
@@ -847,7 +847,7 @@ saisei <- function(i, force = FALSE, .compute = "default") {
   envir <- ..[[.compute]]
   i <- as.integer(`length<-`(i, 1L))
   length(envir[["sockc"]]) && i > 0L && i <= envir[["n"]] && substr(envir[["urls"]][[i]], 1L, 1L) != "t" || return()
-  r <- query_dispatcher(sock = envir[["sockc"]], command = if (force) -i else i, mode = 2L)
+  r <- query_dispatcher(sock = envir[["sockc"]], command = if (force) -i else i, mode = 9L)
   is.character(r) && nzchar(r) || return()
   envir[["urls"]][[i]] <- r
   r