Skip to content
Snippets Groups Projects
Commit 8d18acc3 authored by Stepan Sindelar's avatar Stepan Sindelar
Browse files

Disable cluster unit test that transiently hangs

PullRequest: fastr/1611
parents 0261a531 cd1a991e
No related branches found
No related tags found
No related merge requests found
...@@ -23,6 +23,7 @@ ...@@ -23,6 +23,7 @@
package com.oracle.truffle.r.test.library.base; package com.oracle.truffle.r.test.library.base;
import org.junit.Before; import org.junit.Before;
import org.junit.Ignore;
import org.junit.Test; import org.junit.Test;
import com.oracle.truffle.r.test.TestBase; import com.oracle.truffle.r.test.TestBase;
...@@ -36,7 +37,9 @@ public class TestSharedCluster extends TestBase { ...@@ -36,7 +37,9 @@ public class TestSharedCluster extends TestBase {
} }
@Test @Test
@Ignore("Transient hangs")
public void testSharedCluster() { public void testSharedCluster() {
// TODO: debug and unignore
assertEval(TestBase.template( assertEval(TestBase.template(
"library(parallel); fun <- function(data) { cl <- makeCluster(%0, ifelse(exists('engine', where=R.version),'SHARED','PSOCK')); parLapply(cl, data, function(x) x+1); stopCluster(cl) }; fun(1:100)", "library(parallel); fun <- function(data) { cl <- makeCluster(%0, ifelse(exists('engine', where=R.version),'SHARED','PSOCK')); parLapply(cl, data, function(x) x+1); stopCluster(cl) }; fun(1:100)",
"123456789".split(""))); "123456789".split("")));
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment