diff --git a/RBBGCMuso/R/multiSite.R b/RBBGCMuso/R/multiSite.R index ed36220..af8bef5 100644 --- a/RBBGCMuso/R/multiSite.R +++ b/RBBGCMuso/R/multiSite.R @@ -9,6 +9,8 @@ copyToThreadDirs2 <- function(iniSource, thread_prefix = "thread", numCores, exe directory=file.path("tmp", paste0(thread_prefix,"_1"),tools::file_path_sans_ext(basename(x)),""), d =TRUE) file.copy(executable, file.path("tmp", paste0(thread_prefix,"_1"),tools::file_path_sans_ext(basename(x)))) + tryCatch(file.copy(file.path(execPath,"cygwin.dll"), + file.path("tmp", paste0(thread_prefix,"_1"),tools::file_path_sans_ext(basename(x)))),function(e){"If you are in Windows..."}) }) sapply(2:numCores,function(thread){