From dd21ff7228b60e183694cbebab18c569f57d4077 Mon Sep 17 00:00:00 2001 From: Adam Welc <adam.welc@oracle.com> Date: Tue, 15 Mar 2016 20:23:42 -0700 Subject: [PATCH] Regenerated tests. --- .../truffle/r/test/ExpectedTestOutput.test | 32 +++++++++++++++++++ 1 file changed, 32 insertions(+) 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 15fa0c365e..6135582393 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 @@ -11921,6 +11921,12 @@ numeric(0) [6] 0.027343750 -0.020507812 0.016113281 -0.013092041 0.010910034 [11] -0.009273529 +##com.oracle.truffle.r.test.builtins.TestBuiltin_class.testGetClass +#{ gen<-function(object) 0; setGeneric("gen"); class(gen) } +[1] "standardGeneric" +attr(,"package") +[1] "methods" + ##com.oracle.truffle.r.test.builtins.TestBuiltin_class.testGetClass #{x<-1;class(x)} [1] "numeric" @@ -93170,6 +93176,32 @@ Error in match(x, table, nomatch = 0L) : #{ e <- quote(f(x=a, y=b)); names(e[-1]) } [1] "x" "y" +##com.oracle.truffle.r.test.library.base.TestSimpleVectors.testLanguageIndex +#{ x<-quote(function(x, y) 42); names(x[[2]]) } +[1] "x" "y" + +##com.oracle.truffle.r.test.library.base.TestSimpleVectors.testLanguageIndex +#{ x<-quote(function(x, y) 42); typeof(x[[2]][[1]]) } +[1] "symbol" + +##com.oracle.truffle.r.test.library.base.TestSimpleVectors.testLanguageIndex +#{ x<-quote(function(x, y) 42); x[[2]] } +$x + + +$y + + + +##com.oracle.truffle.r.test.library.base.TestSimpleVectors.testLanguageIndex +#{ x<-quote(function(x, y=7) 42); x[[2]] } +$x + + +$y +[1] 7 + + ##com.oracle.truffle.r.test.library.base.TestSimpleVectors.testLengthUpdate #{ k <- c(1,2,3) ; length(k) <- 5 ; k } [1] 1 2 3 NA NA -- GitLab