diff --git a/DESCRIPTION b/DESCRIPTION index 01bc93d5..9ca128f4 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,8 +1,8 @@ Package: wrapr Type: Package -Title: Wrap R Functions for Debugging and Parametric Programming +Title: Wrap R Tools for Debugging and Parametric Programming Version: 1.2.0 -Date: 2018-02-19 +Date: 2018-02-21 Authors@R: c( person("John", "Mount", email = "jmount@win-vector.com", role = c("aut", "cre")), person("Nina", "Zumel", email = "nzumel@win-vector.com", role = c("aut")), @@ -11,9 +11,11 @@ Authors@R: c( URL: https://github.com/WinVector/wrapr, http://winvector.github.io/wrapr/ Maintainer: John Mount BugReports: https://github.com/WinVector/wrapr/issues -Description: Powerful tools for writing and debugging R code. Provides: 'let()' which converts non-standard evaluation interfaces to - parametric standard evaluation interface, 'DebugFnW()' to capture function context on error for - debugging, and ':=' named map builder, and lambda-abstraction. +Description: Tools for writing and debugging R code. Provides: 'let()' which + converts non-standard evaluation interfaces to parametric standard + evaluation interface, 'qc()' quoting concatenate, 'DebugFnW()' to + capture function context on error for debugging, dot-pipe, ':=' + named map builder, and lambda-abstraction. License: GPL-3 Encoding: UTF-8 LazyData: true diff --git a/NEWS.md b/NEWS.md index a538b4c0..5c060971 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,5 +1,5 @@ -# wrapr 1.2.0 2018-02-19 +# wrapr 1.2.0 2018-02-21 * Add map_upper. * Accept x=y in qae(). diff --git a/cran-comments.md b/cran-comments.md index ea363364..c55fab98 100644 --- a/cran-comments.md +++ b/cran-comments.md @@ -1,15 +1,27 @@ +Note to CRAN: + +There is one reverse dependency check issue: 'seplyr' issues 1 warning, +which is due to a vignette failure. This failure is already occurring +on CRAN and was triggered by the release of version 0.2.0 of +the 'rlang' package (published 2018-02-20). It is my intent to +fix 'seplyr' by removing offending code, but that is much easier +and safer to do if I can update the dependent package 'wrapr' first +(which is what I am attempting to do with this 'wrapr' release). + + ## Test environments * Windows - * using R Under development (unstable) (2018-01-19 r74138) + * using R Under development (unstable) (2018-02-20 r74280) * using platform: x86_64-w64-mingw32 (64-bit) * OSX * using R version 3.4.3 (2017-11-30) * using platform: x86_64-apple-darwin15.6.0 (64-bit) + ## R CMD check --as-cran wrapr_1.2.0.tar.gz * this is package ‘wrapr’ version ‘1.2.0’ @@ -17,10 +29,8 @@ * checking CRAN incoming feasibility ... NOTE Maintainer: ‘John Mount ’ - Number of updates in past 6 months: 7 - +Status: OK -Status: 1 NOTE ## Downstream dependencies @@ -32,5 +42,5 @@ devtools::revdep_check() Checked cdata : 0 errors | 0 warnings | 0 notes Checked replyr : 0 errors | 0 warnings | 0 notes Checked rquery : 0 errors | 0 warnings | 0 notes - Checked seplyr : 0 errors | 0 warnings | 0 notes + Checked seplyr : 0 errors | 1 warning | 0 notes Checked WVPlots: 0 errors | 0 warnings | 0 notes diff --git a/docs/articles/CornerCases.html b/docs/articles/CornerCases.html index c8f40f51..31db5948 100644 --- a/docs/articles/CornerCases.html +++ b/docs/articles/CornerCases.html @@ -93,7 +93,7 @@

Corner Cases

John Mount

-

2018-02-19

+

2018-02-21

diff --git a/docs/articles/DebugFnW.html b/docs/articles/DebugFnW.html index 950c51b7..3586719f 100644 --- a/docs/articles/DebugFnW.html +++ b/docs/articles/DebugFnW.html @@ -93,7 +93,7 @@

Debug Vignette

John Mount, Nina Zumel

-

2018-02-19

+

2018-02-21

@@ -142,7 +142,7 @@

2018-02-19

## List of 4
 ##  $ fn       :function (i)  
 ##   ..- attr(*, "srcref")=Class 'srcref'  atomic [1:8] 5 6 5 32 6 32 5 5
-##   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x7fb1789bf298> 
+##   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x7fb7d411dca0> 
 ##  $ args     :List of 1
 ##   ..$ : num 0
 ##  $ namedargs: language df(x)
diff --git a/docs/articles/SubstitutionModes.html b/docs/articles/SubstitutionModes.html
index 559ca05d..a0a186f1 100644
--- a/docs/articles/SubstitutionModes.html
+++ b/docs/articles/SubstitutionModes.html
@@ -93,7 +93,7 @@
       
Substitution Modes

                         
John Mount

             
-            
2018-02-19

+            
2018-02-21

           
 
     
diff --git a/docs/articles/dot_pipe.html b/docs/articles/dot_pipe.html
index 0b927d50..79ae385e 100644
--- a/docs/articles/dot_pipe.html
+++ b/docs/articles/dot_pipe.html
@@ -93,7 +93,7 @@
       
Dot Pipe

                         
John Mount

             
-            
2018-02-19

+            
2018-02-21

           
 
     
diff --git a/docs/articles/lambda.html b/docs/articles/lambda.html
index 8bcf6878..145adf0a 100644
--- a/docs/articles/lambda.html
+++ b/docs/articles/lambda.html
@@ -93,7 +93,7 @@
       
lambda Function Builder

                         
John Mount

             
-            
2018-02-19

+            
2018-02-21

           
 
     
diff --git a/docs/articles/let.html b/docs/articles/let.html
index 7b4802ec..276729dc 100644
--- a/docs/articles/let.html
+++ b/docs/articles/let.html
@@ -93,7 +93,7 @@
       
Let

                         
Nina Zumel, John Mount

             
-            
2018-02-19

+            
2018-02-21

           
 
     
diff --git a/docs/articles/named_map_builder.html b/docs/articles/named_map_builder.html
index 0dde8165..ac9f495e 100644
--- a/docs/articles/named_map_builder.html
+++ b/docs/articles/named_map_builder.html
@@ -93,7 +93,7 @@
       
Named Map Builder

                         
John Mount

             
-            
2018-02-19

+            
2018-02-21

           
 
     
diff --git a/docs/articles/wrapr_applicable.html b/docs/articles/wrapr_applicable.html
index c3436c08..55be969c 100644
--- a/docs/articles/wrapr_applicable.html
+++ b/docs/articles/wrapr_applicable.html
@@ -93,7 +93,7 @@
       
wrapr_applicable

                         
John Mount, Win-Vector LLC

             
-            
2018-02-19

+            
2018-02-21

           
 
     
diff --git a/docs/index.html b/docs/index.html
index 1d1cf451..38597225 100644
--- a/docs/index.html
+++ b/docs/index.html
@@ -5,7 +5,7 @@
 
 
 
-Wrap R Functions for Debugging and Parametric Programming • wrapr
+Wrap R Tools for Debugging and Parametric Programming • wrapr
 
 
 
diff --git a/docs/news/index.html b/docs/news/index.html
index 9749b7f8..68a7fa88 100644
--- a/docs/news/index.html
+++ b/docs/news/index.html
@@ -118,9 +118,9 @@ 
Change log All releases

     
 
     

-    

+    

 

-wrapr 1.2.0 2018-02-19

+wrapr 1.2.0 2018-02-21
 
    
 
  • Add map_upper.
    • 
 
  • Accept x=y in qae().
    • 
@@ -256,7 +256,7 @@ 
    
     
    
       
    Contents
    
       
      
-        
    • 1.2.0
      • 
+        
    • 1.2.0
      • 
         
    • 1.1.1
      • 
         
    • 1.1.0
      • 
         
    • 1.0.2
      • 
diff --git a/docs/reference/DebugFn.html b/docs/reference/DebugFn.html
index eae0b244..c447b1d3 100644
--- a/docs/reference/DebugFn.html
+++ b/docs/reference/DebugFn.html
@@ -158,14 +158,14 @@ 
      Examp
 # capture error on incorrect run
 tryCatch(
    DebugFn(saveDest, f, 12),
-   error = function(e) { print(e) })
    #> <simpleError in value[[3L]](cond): wrapr::DebugFn: wrote '/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpFfDXkB/debug1399433b7ea94.RDS' on catching 'Error in (1:10)[[i]]: subscript out of bounds'
+   error = function(e) { print(e) })
    #> <simpleError in value[[3L]](cond): wrapr::DebugFn: wrote '/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpC8VzyS/debugf45d5fd07584.RDS' on catching 'Error in (1:10)[[i]]: subscript out of bounds'
 #>  You can reproduce the error with:
-#> 'p <- readRDS('/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpFfDXkB/debug1399433b7ea94.RDS'); do.call(p$fn, p$args)'>
    # examine details
+#> 'p <- readRDS('/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpC8VzyS/debugf45d5fd07584.RDS'); do.call(p$fn, p$args)'>
    # examine details
 situation <- readRDS(saveDest)
 str(situation)
    #> List of 3
 #>  $ fn     :function (i)  
 #>   ..- attr(*, "srcref")=Class 'srcref'  atomic [1:8] 3 6 3 32 6 32 3 3
-#>   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x110080178> 
+#>   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x109c589c8> 
 #>  $ args   :List of 1
 #>   ..$ : num 12
 #>  $ fn_name: chr "f"
    # fix and re-run
diff --git a/docs/reference/DebugFnE.html b/docs/reference/DebugFnE.html
index b3cfff0c..646e516d 100644
--- a/docs/reference/DebugFnE.html
+++ b/docs/reference/DebugFnE.html
@@ -158,17 +158,17 @@ 
    Examp
 # capture error on incorrect run
 tryCatch(
    DebugFnE(saveDest, f, 12),
-   error = function(e) { print(e) })
    #> <simpleError in value[[3L]](cond): wrapr::DebugFnE: wrote '/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpFfDXkB/debug13994df6b654.RDS' on catching 'Error in (1:10)[[i]]: subscript out of bounds'
+   error = function(e) { print(e) })
    #> <simpleError in value[[3L]](cond): wrapr::DebugFnE: wrote '/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpC8VzyS/debugf45d6d2cfea0.RDS' on catching 'Error in (1:10)[[i]]: subscript out of bounds'
 #>  You can reproduce the error with:
-#> 'p <- readRDS('/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpFfDXkB/debug13994df6b654.RDS'); do.call(p$fn, p$args, envir= p$env)'>
    # examine details
+#> 'p <- readRDS('/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpC8VzyS/debugf45d6d2cfea0.RDS'); do.call(p$fn, p$args, envir= p$env)'>
    # examine details
 situation <- readRDS(saveDest)
 str(situation)
    #> List of 4
 #>  $ fn     :function (i)  
 #>   ..- attr(*, "srcref")=Class 'srcref'  atomic [1:8] 3 6 3 32 6 32 3 3
-#>   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x10da0e678> 
+#>   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x110631830> 
 #>  $ args   :List of 1
 #>   ..$ : num 12
-#>  $ env    :<environment: 0x10da0e9f8> 
+#>  $ env    :<environment: 0x1106314b0> 
 #>  $ fn_name: chr "f"
    # fix and re-run
 situation$args[[1]] <- 6
 do.call(situation$fn, situation$args, envir=situation$env)
    #> [1] 6
    # clean up
diff --git a/docs/reference/DebugFnW.html b/docs/reference/DebugFnW.html
index 108c0816..b34da466 100644
--- a/docs/reference/DebugFnW.html
+++ b/docs/reference/DebugFnW.html
@@ -156,14 +156,14 @@ 
    Examp
 # capture error on incorrect run
 tryCatch(
    df(12),
-   error = function(e) { print(e) })
    #> <simpleError in value[[3L]](cond): wrapr::DebugFnW: wrote '/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpFfDXkB/debug1399431231ffb.RDS' on catching 'Error in (1:10)[[i]]: subscript out of bounds'
+   error = function(e) { print(e) })
    #> <simpleError in value[[3L]](cond): wrapr::DebugFnW: wrote '/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpC8VzyS/debugf45d11a7fc44.RDS' on catching 'Error in (1:10)[[i]]: subscript out of bounds'
 #>  You can reproduce the error with:
-#> 'p <- readRDS('/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpFfDXkB/debug1399431231ffb.RDS'); do.call(p$fn, p$args)'>
    # examine details
+#> 'p <- readRDS('/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpC8VzyS/debugf45d11a7fc44.RDS'); do.call(p$fn, p$args)'>
    # examine details
 situation <- readRDS(saveDest)
 str(situation)
    #> List of 4
 #>  $ fn       :function (i)  
 #>   ..- attr(*, "srcref")=Class 'srcref'  atomic [1:8] 3 6 3 32 6 32 3 3
-#>   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x110288098> 
+#>   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x109476ed8> 
 #>  $ args     :List of 1
 #>   ..$ : num 12
 #>  $ namedargs: language df(12)
@@ -186,7 +186,7 @@ 
    Examp
 #>  'do.call(p$fn, p$args)' (replace 'p' with actual variable name)>
    str(lastError)
    #> List of 4
 #>  $ fn       :function (i)  
 #>   ..- attr(*, "srcref")=Class 'srcref'  atomic [1:8] 22 6 22 32 6 32 22 22
-#>   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x10930da78> 
+#>   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x10bde2630> 
 #>  $ args     :List of 1
 #>   ..$ : num 12
 #>  $ namedargs: language df(12)
diff --git a/docs/reference/DebugFnWE.html b/docs/reference/DebugFnWE.html
index a93a1858..9696192f 100644
--- a/docs/reference/DebugFnWE.html
+++ b/docs/reference/DebugFnWE.html
@@ -160,19 +160,19 @@ 
    Examp
 # capture error on incorrect run
 tryCatch(
    df(12),
-   error = function(e) { print(e) })
    #> <simpleError in value[[3L]](cond): wrapr::DebugFnWE: wrote '/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpFfDXkB/debug1399474eb6957.RDS' on catching 'Error in (1:10)[[i]]: subscript out of bounds'
+   error = function(e) { print(e) })
    #> <simpleError in value[[3L]](cond): wrapr::DebugFnWE: wrote '/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpC8VzyS/debugf45d6f0ed02a.RDS' on catching 'Error in (1:10)[[i]]: subscript out of bounds'
 #>  You can reproduce the error with:
-#> 'p <- readRDS('/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpFfDXkB/debug1399474eb6957.RDS'); do.call(p$fn, p$args, envir= p$env)'>
    # examine details
+#> 'p <- readRDS('/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpC8VzyS/debugf45d6f0ed02a.RDS'); do.call(p$fn, p$args, envir= p$env)'>
    # examine details
 situation <- readRDS(saveDest)
 str(situation)
    #> List of 5
 #>  $ fn       :function (i)  
 #>   ..- attr(*, "srcref")=Class 'srcref'  atomic [1:8] 3 6 3 32 6 32 3 3
-#>   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x102c2b270> 
+#>   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x10d51ec70> 
 #>  $ args     :List of 1
 #>   ..$ : num 12
 #>  $ namedargs: language df(12)
 #>  $ fn_name  : chr "f"
-#>  $ env      :<environment: 0x102c2a388> 
    # fix and re-run
+#>  $ env      :<environment: 0x10d51eff0> 
    # fix and re-run
 situation$args[[1]] <- 6
 do.call(situation$fn, situation$args, envir=situation$env)
    #> [1] 6
    # clean up
 file.remove(saveDest)
    #> [1] TRUE
    
diff --git a/docs/reference/DebugPrintFn.html b/docs/reference/DebugPrintFn.html
index 340c6566..47f6b0f6 100644
--- a/docs/reference/DebugPrintFn.html
+++ b/docs/reference/DebugPrintFn.html
@@ -159,14 +159,14 @@ 
    Examp
 # capture error on incorrect run
 tryCatch(
    DebugPrintFn(saveDest, f, 12),
-   error = function(e) { print(e) })
    #> <simpleError in value[[3L]](cond): wrapr::DebugPrintFn: wrote '/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpFfDXkB/debug139942bca28e2.RDS' on catching 'Error in (1:10)[[i]]: subscript out of bounds'
+   error = function(e) { print(e) })
    #> <simpleError in value[[3L]](cond): wrapr::DebugPrintFn: wrote '/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpC8VzyS/debugf45d3788bcce.RDS' on catching 'Error in (1:10)[[i]]: subscript out of bounds'
 #>  You can reproduce the error with:
-#> 'p <- readRDS('/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpFfDXkB/debug139942bca28e2.RDS'); do.call(p$fn, p$args)'>
    # examine details
+#> 'p <- readRDS('/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpC8VzyS/debugf45d3788bcce.RDS'); do.call(p$fn, p$args)'>
    # examine details
 situation <- readRDS(saveDest)
 str(situation)
    #> List of 3
 #>  $ fn     :function (i)  
 #>   ..- attr(*, "srcref")=Class 'srcref'  atomic [1:8] 3 6 3 32 6 32 3 3
-#>   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x10e0b3c78> 
+#>   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x1108adb78> 
 #>  $ args   :List of 1
 #>   ..$ : num 12
 #>  $ fn_name: chr "f"
    # fix and re-run
diff --git a/docs/reference/DebugPrintFnE.html b/docs/reference/DebugPrintFnE.html
index 215a565a..93513744 100644
--- a/docs/reference/DebugPrintFnE.html
+++ b/docs/reference/DebugPrintFnE.html
@@ -159,17 +159,17 @@ 
    Examp
 # capture error on incorrect run
 tryCatch(
    DebugPrintFnE(saveDest, f, 12),
-   error = function(e) { print(e) })
    #> <simpleError in value[[3L]](cond): wrapr::DebugPrintFnE: wrote '/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpFfDXkB/debug139943278b8a7.RDS' on catching 'Error in (1:10)[[i]]: subscript out of bounds'
+   error = function(e) { print(e) })
    #> <simpleError in value[[3L]](cond): wrapr::DebugPrintFnE: wrote '/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpC8VzyS/debugf45d6b6b58df.RDS' on catching 'Error in (1:10)[[i]]: subscript out of bounds'
 #>  You can reproduce the error with:
-#> 'p <- readRDS('/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpFfDXkB/debug139943278b8a7.RDS'); do.call(p$fn, p$args, envir= p$env)'>
    # examine details
+#> 'p <- readRDS('/var/folders/7q/h_jp2vj131g5799gfnpzhdp80000gn/T//RtmpC8VzyS/debugf45d6b6b58df.RDS'); do.call(p$fn, p$args, envir= p$env)'>
    # examine details
 situation <- readRDS(saveDest)
 str(situation)
    #> List of 4
 #>  $ fn     :function (i)  
 #>   ..- attr(*, "srcref")=Class 'srcref'  atomic [1:8] 3 6 3 32 6 32 3 3
-#>   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x1113bc6d0> 
+#>   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x1090a5878> 
 #>  $ args   :List of 1
 #>   ..$ : num 12
-#>  $ env    :<environment: 0x1113bc350> 
+#>  $ env    :<environment: 0x1090a5c30> 
 #>  $ fn_name: chr "f"
    # fix and re-run
 situation$args[[1]] <- 6
 do.call(situation$fn, situation$args, envir=situation$env)
    #> [1] 6
    # clean up
diff --git a/docs/reference/buildNameCallback.html b/docs/reference/buildNameCallback.html
index 45824c65..2fb13431 100644
--- a/docs/reference/buildNameCallback.html
+++ b/docs/reference/buildNameCallback.html
@@ -153,7 +153,7 @@ 
    Examp
 str(lastError)
    #> List of 4
 #>  $ fn       :function (i)  
 #>   ..- attr(*, "srcref")=Class 'srcref'  atomic [1:8] 3 6 3 32 6 32 3 3
-#>   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x1117003f0> 
+#>   .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x109f9dc08> 
 #>  $ args     :List of 1
 #>   ..$ : num 12
 #>  $ namedargs: language df(12)