1
2progs <- if (WINDOWS) {
3  file.path("tools", c("cmdzip.exe", "cmdunzip.exe", "zip.exe"))
4} else {
5  file.path("tools", c("cmdzip", "cmdunzip"))
6}
7
8dest <- file.path(R_PACKAGE_DIR, paste0("bin", R_ARCH))
9dir.create(dest, recursive = TRUE, showWarnings = FALSE)
10file.copy(progs, dest, overwrite = TRUE)
11
12files <- Sys.glob(paste0("*", SHLIB_EXT))
13dest <- file.path(R_PACKAGE_DIR, paste0('libs', R_ARCH))
14dir.create(dest, recursive = TRUE, showWarnings = FALSE)
15file.copy(files, dest, overwrite = TRUE)
16if (file.exists("symbols.rds")) {
17  file.copy("symbols.rds", dest, overwrite = TRUE)
18}
19