Fix internal error in compilers() (#313)

TimTaylor · web-flow · commit 7aa5ec3b7d67 · 2025-03-12T13:37:43.000+01:00
diff --git a/R/compilation-db.R b/R/compilation-db.R
@@ -188,6 +188,9 @@ compilers <- function() {
   )
   makevars <- unlist(lapply(makevars, function(var) if (length(var)) c("-f", var)))
 
+  # Add silent flag to avoid unwanted output
+  makevars <- c("-s", makevars)
+
   # These variables are normally set by frontends but just in case
   env <- c(
     "current",

Original file line number	Diff line number	Diff line change
`@@ -188,6 +188,9 @@ compilers <- function() {`
`188`	`188`	`)`
`189`	`189`	`makevars <- unlist(lapply(makevars, function(var) if (length(var)) c("-f", var)))`
`190`	`190`
	`191`	`+ # Add silent flag to avoid unwanted output`
	`192`	`+ makevars <- c("-s", makevars)`
	`193`	`+`
`191`	`194`	`# These variables are normally set by frontends but just in case`
`192`	`195`	`env <- c(`
`193`	`196`	`"current",`