diff --git a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/ExpectedTestOutput.test b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/ExpectedTestOutput.test index 7d9fa7f80c3becfa9c006dfe57995ed7014af2dd..cbdc67d4663c7aa6229c65d69b3696ae16a67cb0 100644 --- a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/ExpectedTestOutput.test +++ b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/ExpectedTestOutput.test @@ -37906,6 +37906,42 @@ attr(,"match.length") attr(,"useBytes") [1] TRUE +##com.oracle.truffle.r.test.builtins.TestBuiltin_regexpr.testRegExpr +#{ regexpr("aaa", "bbbaaaccc", fixed=TRUE) } +[1] 4 +attr(,"match.length") +[1] 3 +attr(,"useBytes") +[1] TRUE + +##com.oracle.truffle.r.test.builtins.TestBuiltin_regexpr.testRegExpr +#{ regexpr("aaa", c("bbbaaaccc", "haaah"), fixed=TRUE) } +[1] 4 2 +attr(,"match.length") +[1] 3 3 +attr(,"useBytes") +[1] TRUE + +##com.oracle.truffle.r.test.builtins.TestBuiltin_regexpr.testRegExpr +#{ regexpr("aaa", c("bbbaaaccc", "hah"), fixed=TRUE) } +[1] 4 -1 +attr(,"match.length") +[1] 3 -1 +attr(,"useBytes") +[1] TRUE + +##com.oracle.truffle.r.test.builtins.TestBuiltin_regexpr.testRegExpr +#{ x<-regexpr("aaa", "bbbaaaccc", fixed=TRUE); c(x[1]) } +[1] 4 + +##com.oracle.truffle.r.test.builtins.TestBuiltin_regexpr.testRegExpr +#{ x<-regexpr("aaa", c("bbbaaaccc", "haaah"), fixed=TRUE); c(x[1], x[2]) } +[1] 4 2 + +##com.oracle.truffle.r.test.builtins.TestBuiltin_regexpr.testRegExpr +#{ x<-regexpr("aaa", c("bbbaaaccc", "hah"), fixed=TRUE); c(x[1], x[2]) } +[1] 4 -1 + ##com.oracle.truffle.r.test.builtins.TestBuiltin_regexpr.testregexpr1 #argv <- list('package:', 'exNSS4', FALSE, FALSE, TRUE, FALSE); .Internal(regexpr(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]])) [1] -1