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 e4c5f5ed012f7ab0b344b7e4e75bf29b4b67ebe8..d27fa83b3560be5b58f74f526c82eb76d86beeb2 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 @@ -48380,6 +48380,18 @@ expression() #{ a <- as.raw(200) ; b <- as.raw(255) ; paste(a, b) } [1] "c8 ff" +##com.oracle.truffle.r.test.builtins.TestBuiltin_paste.testPaste# +#{ paste('a', 'a', 1:3, 'b', 'b', sep='.') } +[1] "a.a.1.b.b" "a.a.2.b.b" "a.a.3.b.b" + +##com.oracle.truffle.r.test.builtins.TestBuiltin_paste.testPaste# +#{ paste('a', 1:3, 'b', sep='.') } +[1] "a.1.b" "a.2.b" "a.3.b" + +##com.oracle.truffle.r.test.builtins.TestBuiltin_paste.testPaste# +#{ paste('a', 1:3, sep='.') } +[1] "a.1" "a.2" "a.3" + ##com.oracle.truffle.r.test.builtins.TestBuiltin_paste.testPaste# #{ paste() } character(0) @@ -48392,6 +48404,14 @@ character(0) #{ paste(1:2, 1:3, FALSE, collapse=NULL) } [1] "1 1 FALSE" "2 2 FALSE" "1 3 FALSE" +##com.oracle.truffle.r.test.builtins.TestBuiltin_paste.testPaste# +#{ paste(1:3, 'b', sep='.') } +[1] "1.b" "2.b" "3.b" + +##com.oracle.truffle.r.test.builtins.TestBuiltin_paste.testPaste# +#{ paste(1:3, sep='.') } +[1] "1" "2" "3" + ##com.oracle.truffle.r.test.builtins.TestBuiltin_paste.testPaste# #{ paste(NA) } [1] "NA" @@ -70820,6 +70840,14 @@ character(0) #{ sprintf("foo") } [1] "foo" +##com.oracle.truffle.r.test.builtins.TestBuiltin_sprintf.testSprintf# +#{ sprintf('%.3d', 4.0) } +[1] "004" + +##com.oracle.truffle.r.test.builtins.TestBuiltin_sprintf.testSprintf# +#{ sprintf('%.3i', 4.0) } +[1] "004" + ##com.oracle.truffle.r.test.builtins.TestBuiltin_sprintf.testSprintf# #{ sprintf('%s', list('hello world')) } [1] "hello world"