tests/multiCondIf.R

In duncantl/R2llvm: LLVM-based compiler for R code

library(RLLVMCompile)

f =
function(x)
{
   if(x < 10 && x > 5)
       20L
   else
       -1L
}

fc = compileFunction(f, Int32Type, list(DoubleType))
stopifnot(.llvm(fc, 7) == 20L)
stopifnot(.llvm(fc, 12) == -1L)