tests/globalArrays.R

In duncantl/Rllvm: Interface to llvm for dynamically compiling native code.

library(Rllvm)
m = Module()
ty = arrayType(Int32Type, 100)
m[["i"]] = ty
setInitializer(m[["i"]], constantAggregateZero(ty))

ty = arrayType(DoubleType, 99)
m[["d"]] = ty
setInitializer(m[["d"]], constantAggregateZero(ty))

ee = ExecutionEngine(m)
i = m[["i", ee = ee]]
d = m[["d", ee = ee]]

print(length(i))
print(length(d))

# Use a different initializer

ty = arrayType(DoubleType, 10)
m[["o"]] = ty


#XXX
# setInitializer(m[["dd"]], createConstant(3.1415))