Don't remove context unecessary. We now need it. Assuming that when token are added or removed, the rules account for token_after or token_before being potentially wrong. Don't think there is a case so far.

Author: lorenzwalthert

R/nest.R

@@ -302,16 +302,6 @@ add_attributes_caching <- function(pd_flat, transformers, more_specs) {
   pd_flat
 }
 
-#' @describeIn add_token_terminal Removes column `terimnal_token_before`. Might
-#'   be used to prevent the use of invalidated information, e.g. if tokens were
-#'   added to the nested parse table.
-#' @keywords internal
-remove_terminal_token_before_and_after <- function(pd_flat) {
-  pd_flat$token_before <- NULL
-  pd_flat$token_after <- NULL
-  pd_flat
-}
-
 #' Helper for setting spaces
 #'
 #' @param spaces_after_prefix An integer vector with the number of spaces

R/style-guides.R

@@ -168,7 +168,6 @@ tidyverse_style <- function(scope = "tokens",
       force_assignment_op = force_assignment_op,
       resolve_semicolon = resolve_semicolon,
       add_brackets_in_pipe = add_brackets_in_pipe,
-      remove_terminal_token_before_and_after = remove_terminal_token_before_and_after,
       wrap_if_else_while_for_fun_multi_line_in_curly =
         if (strict) wrap_if_else_while_for_fun_multi_line_in_curly
     )

man/add_token_terminal.Rd

@@ -85,8 +85,7 @@ test_that("tidyverse transformers are correctly dropped", {
 
   names_tokens <- c(
     "fix_quotes",
-    if (getRversion() < 3.6) "force_assignment_op",
-    "remove_terminal_token_before_and_after"
+    if (getRversion() < 3.6) "force_assignment_op"
   )
   expect_setequal(names(t_fun$token), names_tokens)
 })