filename <- system.file("data-ex/exampleVComments.R", package="R.utils")
lines <- readLines(filename)
cat("Code before preprocessing:
")
displayCode(code=lines, pager="console")
lines <- VComments$compile(lines)
cat("Code after preprocessing:
")
displayCode(code=lines, pager="console")
Run the code above in your browser using DataLab