aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohannes Ranke <johannes.ranke@jrwb.de>2015-06-20 17:52:51 +0200
committerJohannes Ranke <johannes.ranke@jrwb.de>2015-06-20 17:52:51 +0200
commit35ff2c2e7154b5d66a6b33e77d3f4f40282df3c2 (patch)
treeb2edf5df946ae33e84651afb691a4e3321ed1b5d
parent062b9cc1d084e8bb5e552076fc48ade4b3050644 (diff)
Suppress compiler warning for sometimes unused time variable
-rw-r--r--R/mkinmod.R4
1 files changed, 3 insertions, 1 deletions
diff --git a/R/mkinmod.R b/R/mkinmod.R
index a0307003..72c4652a 100644
--- a/R/mkinmod.R
+++ b/R/mkinmod.R
@@ -273,7 +273,8 @@ mkinmod <- function(..., use_of_ff = "min", speclist = NULL, quiet = FALSE)
model$coefmat <- m
}#}}}
- # Create a function compiled from C code if more than one observed variable and gcc is available #{{{
+ # Create a function compiled from C code if more than one observed {{{
+ # variable and gcc is available
if (length(obs_vars) > 1) {
if (Sys.which("gcc") != "") {
@@ -331,6 +332,7 @@ mkinmod <- function(..., use_of_ff = "min", speclist = NULL, quiet = FALSE)
model$cf <- cfunction(list(func = derivs_sig), derivs_code,
otherdefs = initpar_code,
+ cppargs = "-Wno-unused-variable",
convention = ".C", language = "C")
}
}

Contact - Imprint