library(RLLVMCompile)
f =
function(x)
{
x[1] = 3.1415
x[1]
}
fc = compileFunction(f, DoubleType, pointerType(DoubleType))
.llvm(fc, 3)
m = as(fc, "Module")
ir = showModule(m, TRUE)
save(ir, file = "ir.rda")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.