R/zzz.R

In armgong/rjulia2: Integrating R and Julia -- Calling Julia from R

.juliaLib <- function()
    gsub("\"", "",
         system('julia -E "abspath(Libdl.dlpath(\\\"libjulia\\\"))"',
                intern = TRUE))

.onLoad <- function(libname, pkgname)
{
   .ldjulia <<- .juliaLib()
    dll<-dyn.load(.ldjulia,F,T)
    .isJuliaOk<<-F
}

.onUnload <- function(libpath)
{
    if(!exists(".ldjulia")) .ldjulia <- .juliaLib()
    dyn.unload(.ldjulia)
    .isJuliaOk<<-F
}