The R Project SVN R

Rev

Rev 86114 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 86114 Rev 87995
Line 61... Line 61...
61 
        Sys.setenv(CURL_CA_BUNDLE = ca_path)
 61 
        Sys.setenv(CURL_CA_BUNDLE = ca_path)
62 
})
 62 
})
63 
 
 63 
 
64 
local({
 64 
local({
65 
    # keep in step with Rcmd_environ
 65 
    # keep in step with Rcmd_environ
66 
    setRtools44Path <- 0
 66 
    setRtools45Path <- 0
67 
    # INSTALLER-BUILD: setRtools44Path <- 1
 67 
    # INSTALLER-BUILD: setRtools45Path <- 1
68 
 
 68 
 
69 
    if (setRtools44Path) {
 69 
    if (setRtools45Path) {
70 
        aarch64 <- FALSE
 70 
        aarch64 <- FALSE
71 
        # INSTALLER-BUILD-aarch64: aarch64 <- TRUE
 71 
        # INSTALLER-BUILD-aarch64: aarch64 <- TRUE
72 
 
 72 
 
73 
        if (aarch64) {
 73 
        if (aarch64) {
74 
            rthome <- Sys.getenv("RTOOLS44_AARCH64_HOME",
 74 
            rthome <- Sys.getenv("RTOOLS45_AARCH64_HOME",
75 
                                 "c:/rtools44-aarch64")
 75 
                                 "c:/rtools45-aarch64")
76 
            rtpath <- paste0(rthome, "/aarch64-w64-mingw32.static.posix/bin;",
 76 
            rtpath <- paste0(rthome, "/aarch64-w64-mingw32.static.posix/bin;",
77 
                             rthome, "/usr/bin")
 77 
                             rthome, "/usr/bin")
78 
        } else {
 78 
        } else {
79 
            rthome <- Sys.getenv("RTOOLS44_HOME", "c:/rtools44")
 79 
            rthome <- Sys.getenv("RTOOLS45_HOME", "c:/rtools45")
80 
            rtpath <- paste0(rthome, "/x86_64-w64-mingw32.static.posix/bin;",
 80 
            rtpath <- paste0(rthome, "/x86_64-w64-mingw32.static.posix/bin;",
81 
                             rthome, "/usr/bin")
 81 
                             rthome, "/usr/bin")
82 
        }
 82 
        }
83 
        path <- Sys.getenv("R_CUSTOM_TOOLS_PATH", rtpath)
 83 
        path <- Sys.getenv("R_CUSTOM_TOOLS_PATH", rtpath)
84 
        Sys.setenv(R_RTOOLS44_PATH = rtpath)
 84 
        Sys.setenv(R_RTOOLS45_PATH = rtpath)
85 
        Sys.setenv(PATH = paste0(path, ";", Sys.getenv("PATH")))
 85 
        Sys.setenv(PATH = paste0(path, ";", Sys.getenv("PATH")))
86 
    }
 86 
    }
87 
})
 87 
})