update tests

shikokuchuo · Nov 7, 2023 · 3922c1e · 3922c1e
1 parent 72b76ad
commit 3922c1e
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/tests/tests.R b/tests/tests.R
@@ -218,8 +218,8 @@ nanotest(is.complex(call_aio(rek)[["data"]]))
 nanotest(is.pairlist(nxt <- nextmode(inhook = function(x) serialize(x, NULL), outhook = unserialize)))
 nanotest(length(nxt) == 2L)
 nanotest(is.function(nxt[[1L]]))
-nanotest(is.integer(req$send(list(new.env(), new.env()), mode = 3L, block = 500)))
-nanotest(is.environment(recv(rep, block = 500)[[1L]]))
+nanotest(is.integer(req$send(list(rep, ctx), mode = 3L, block = 500)))
+nanotest(typeof(recv(rep, block = 500)[[1L]]) == "externalptr")
 nanotest(is.pairlist(nextmode(NULL, NULL, mark = TRUE)))
 nanotestn(unlist(nextmode()))