opt_dead_expr {rco}

Optimizer: Dead Expression Elimination.

Description

Performs one dead expression elimination pass. Carefully examine the results after running this function!

Usage

opt_dead_expr(texts)

Arguments

texts

A list of character vectors with the code to optimize.

Examples

code <- paste(
  "foo <- function(x) {",
  "  x ^ 3",
  "  return(x ^ 3)",
  "}",
  sep = "\n"
)
cat(opt_dead_expr(list(code))$codes[[1]])