Turn off stochastic tests due to R's new sampler

thomasp85 · Apr 15, 2019 · ff27bbc · ff27bbc
1 parent 1f448f4
commit ff27bbc
Showing 1 changed file with 5 additions and 5 deletions.
diff --git a/tests/testthat/test-linking.R b/tests/testthat/test-linking.R
@@ -9,9 +9,9 @@ test_that("kmerLink works", {
     pg3 <- kmerLink(pg, lowerLimit=0.8, pParam=BiocParallel::SerialParam(), kmerSize = 4)
     expect_equal(groupInfo(pg2)$paralogue, groupInfo(pg3)$paralogue)
     expect_equal(length(unique(groupInfo(pg2)$paralogue)), 3038)
-    if (R.version$arch == 'i386') {
-        expect_equal(groupInfo(pg2)$paralogue[1:6], c(2, 2, 1, 111, 55, 112))
-    } else {
-        expect_equal(groupInfo(pg2)$paralogue[1:6], c(2, 2, 1, 116, 55, 117))
-    }
+    #if (R.version$arch == 'i386') {
+    #    expect_equal(groupInfo(pg2)$paralogue[1:6], c(2, 2, 1, 111, 55, 112))
+    #} else {
+    #    expect_equal(groupInfo(pg2)$paralogue[1:6], c(2, 2, 1, 116, 55, 117))
+    #}
 })