reduce_nested_syntax: Unnest code blocks unnecessarily wrapped in curly brackets

In dgkf/scriptgloss: Functionality for creating static scripts from shiny apps

Description

Unnest code blocks unnecessarily wrapped in curly brackets

Usage

reduce_nested_syntax(x, depth = 1)

Arguments

x	quoted code to process
depth	level of nesting during processing. Used to track code location information during recursive calls.

Value

code which is functionally equivalent but with unnecessary curly brackets removed

Examples

q <- quote({
  {
    {
      a <- 1
    }
  }
  x <- function(a = 1, b = { z <- a; z + 1 }, c = { z + 1}) {
    quote({
      a <- 1
      {
        b <- 2
      }
    })
    a <- 2
  }
})

scriptgloss:::reduce_nested_syntax(q)

dgkf/scriptgloss documentation built on June 8, 2019, 8:43 p.m.