Avoid warning from resolved() on ClusterFuture with parallelly::makeClusterSequential() clusters

Author: HenrikBengtsson

DESCRIPTION

@@ -1,5 +1,5 @@
 Package: future
-Version: 1.68.0-9034
+Version: 1.68.0-9035
 Title: Unified Parallel and Distributed Processing in R for Everyone
 Depends:
     R (>= 3.2.0)

NEWS.md

@@ -26,6 +26,9 @@
    1 unknown future arguments: 'interrupts'" for third-party future
    backends.
 
+ * `resolved()` on a 'cluster' future would produce a warning when
+   using a `parallelly::makeClusterSequential())` cluster.
+
 ## Deprecated and Defunct
 
  * The `cluster` backend now defaults to `earlySignal = FALSE`. This

R/backend_api-11.ClusterFutureBackend-class.R

@@ -725,6 +725,8 @@ resolved.ClusterFuture <- function(x, timeout = NULL, ...) {
     } ## while()
   } else if (inherits(node, "MPInode")) {
     res <- resolveMPI(future)
+  } else if (inherits(node, "sequential_node")) {
+    res <- TRUE
   } else {
     warnf("resolved() is not yet implemented for workers of class %s. Will use value() instead and return TRUE", sQuote(class(node)[1]))
     value(future, stdout = FALSE, signal = FALSE)