X-Git-Url: https://git.auder.net/?p=epclust.git;a=blobdiff_plain;f=epclust%2Ftests%2Ftestthat%2Ftest-computeWerDists.R;h=09ad5c80e0ce9979b8dde861b0b8346c21b83e8e;hp=0e02413944362531c4825c8f08126b7a39c8100c;hb=a961844f362e16c1a4fd3e45d170615b9e11c27f;hpb=14c10f2d252f45349e0b4fbf87e17dfbfae39f92

diff --git a/epclust/tests/testthat/test-computeWerDists.R b/epclust/tests/testthat/test-computeWerDists.R
index 0e02413..09ad5c8 100644
--- a/epclust/tests/testthat/test-computeWerDists.R
+++ b/epclust/tests/testthat/test-computeWerDists.R
@@ -10,7 +10,7 @@ test_that("computeWerDists output correct results",
 	series <- cbind(serie, serie)
 	getSeries <- function(indices) as.matrix(series[,indices])
 	dists <- computeWerDists(1:2, getSeries, 50, 3, 4, nbytes, endian,
-		verbose=TRUE, parll=FALSE)
+		verbose=TRUE)
 	expect_equal(dists, matrix(0.,nrow=2,ncol=2))
 
 	# On two constant series