more r tests

This commit is contained in:
AndLLA 2022-11-20 18:52:00 +01:00
commit 1dd31446ce

View file

@ -0,0 +1,14 @@
clargs <- commandArgs(trailing=TRUE)
source(file.path(clargs[1], "unittest.R"))
#source("unittest.R")
dyn.load(paste("template_ref_type", .Platform$dynlib.ext, sep=""))
source("template_ref_type.R")
cacheMetaData(1)
xr = XC()
y = Y()
unittest(Y_find(y, xr), FALSE)