From cf23cd83a28c13df0c4284eae17a14aa76fc0e67 Mon Sep 17 00:00:00 2001
From: Russell Almond <russell.g.almond@gmail.com>
Date: Fri, 10 Oct 2025 11:47:06 -0400
Subject: [PATCH] Adding isNodeAlive.SOCK0node

Adds a method for forknodes/SOCK0nodes
---
 R/isNodeAlive.R | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/R/isNodeAlive.R b/R/isNodeAlive.R
index b20a3588..ef8caf4e 100644
--- a/R/isNodeAlive.R
+++ b/R/isNodeAlive.R
@@ -41,6 +41,11 @@ isNodeAlive <- function(x, ...) UseMethod("isNodeAlive")
 #' @export
 isNodeAlive.default <- function(x, ...) NA
 
+#' @export
+isNodeAlive.SOCK0node <- function(x, ...) {
+  isConnectionValid(x$con)
+}  
+
 #' @export
 isNodeAlive.RichSOCKnode <- function(x, timeout = 0.0, ...) {
   debug <- isTRUE(getOption("parallelly.debug"))