R/PassManager.R

In doktorschiwago/Rllvm2: Interface to llvm for dynamically compiling native code.

addPass =
function(mgr, pass)
{
  .Call("R_PassManagerBase_Add", mgr, pass)
}

initPass =
function(mgr)
{
  .Call("R_FunctionPassManager_DoInit", mgr)
}

passManager =
function(module, functionManager = !missing(module))
{
  .Call("R_PassManager_new", module, as.logical(functionManager))
}

getPassManager =
function(module, execEngine = ExecutionEngine(module), level = 3L)
{
  .Call("R_getPassManager", module, execEngine, as.integer(level))
}

#setMethod("run", c("FunctionPassManager", "Function")


setMethod("run", c("PassManager"),
           function(.x, mod, ...) {
             .Call("R_PassManager_run", .x, mod)
           })


if(FALSE) {
createDeadStoreEliminationPass =
function()
  .Call("R_createDeadStoreEliminationPass")

createDeadCodeEliminationPass =
function()
  .Call("R_createDeadCodeEliminationPass")

createAgressiveDCEPass =
function()
  .Call("R_createAgressiveDCEPass")

createLICMPass =
function()
  .Call("R_createLICMPass")
}