From bd239ec3d813dfd9a66b8bd98f537a01cfa52fc5 Mon Sep 17 00:00:00 2001 From: Michael Chirico Date: Tue, 19 Mar 2024 22:54:13 -0700 Subject: [PATCH] trailing ws --- inst/tests/programming.Rraw | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/inst/tests/programming.Rraw b/inst/tests/programming.Rraw index 39a31f5c95..56d0a1a9f6 100644 --- a/inst/tests/programming.Rraw +++ b/inst/tests/programming.Rraw @@ -196,35 +196,35 @@ test(5.11, list2lang(list("a", 1L, call("c", 1L, 2L))), list(as.name("a"), 1L, q # datatable.enlist test(6.01, - options = c(datatable.enlist=NULL), + options = c(datatable.enlist=NULL), substitute2(list(v1 = v2, v3 = v4), list(v1 = "int", v2 = 1L, v3 = "lst", v4 = list("a", "b", list("c", "d")))), quote(list(int = 1L, lst = list(a, b, list(c, d))))) test(6.02, - options = c(datatable.enlist=FALSE), + options = c(datatable.enlist=FALSE), substitute2(list(v1 = v2, v3 = v4), list(v1 = "int", v2 = 1L, v3 = "lst", v4 = list("a", "b", list("c", "d")))), substitute(list(int = 1L, lst = lst), list(lst = list("a", "b", list("c", "d"))))) test(6.03, - options = c(datatable.enlist=NULL), + options = c(datatable.enlist=NULL), enlist(list(v1 = 1L, v2 = list(v3 = "b", v4 = list(v5 = "c")))), quote(list(v1 = 1L, v2 = list(v3 = b, v4 = list(v5 = c))))) test(6.04, - options = c(datatable.enlist=FALSE), + options = c(datatable.enlist=FALSE), enlist(list(v1 = 1L, v2 = list(v3 = "b", v4 = list(v5 = "c")))), substitute(list(v1 = 1L, v2 = lst), list(lst=list(v3 = "b", v4 = list(v5 = "c"))))) test(6.05, - options = c(datatable.enlist=NULL), + options = c(datatable.enlist=NULL), substitute2(list(v1, v2, v3), list(v1="V1", v2="V2", v3=enlist(list("V4","V5")))), quote(list(V1, V2, list(V4, V5)))) test(6.06, - options = c(datatable.enlist=FALSE), + options = c(datatable.enlist=FALSE), substitute2(list(v1, v2, v3), list(v1="V1", v2="V2", v3=enlist(list("V4","V5")))), quote(list(V1, V2, list(V4, V5)))) test(6.07, - options = c(datatable.enlist=FALSE), + options = c(datatable.enlist=FALSE), substitute2(list(v1, v2, v3), list(v1="V1", v2="V2", v3=enlist(list("V4","V5", list("V6"))))), substitute(list(V1, V2, list(V4, V5, lst)), list(lst=list("V6")))) test(6.08, - options = c(datatable.enlist=FALSE), + options = c(datatable.enlist=FALSE), substitute2(list(v1, v2, v3), list(v1="V1", v2="V2", v3=enlist(list("V4","V5", enlist(list("V6")))))), quote(list(V1, V2, list(V4, V5, list(V6)))))