diff options
Diffstat (limited to 'R')
| -rw-r--r-- | R/mkinmod.R | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/R/mkinmod.R b/R/mkinmod.R index 215dbed6..29542b71 100644 --- a/R/mkinmod.R +++ b/R/mkinmod.R @@ -464,13 +464,12 @@ mkinmod <- function(..., use_of_ff = "max", name = NULL, silent = TRUE) if (!inherits(model$cf, "try-error")) { - if (is.null(dll_dir)) { - if (!quiet) message("Temporary DLL for differentials generated and loaded") - model$dll_info <- inline::getDynLib(model$cf) - } else { + if (!is.null(dll_dir)) { model$dll_info <- inline::moveDLL(model$cf, name, dll_dir, unload = unload, overwrite = overwrite, verbose = !quiet) } + if (!quiet) message("Temporary DLL for differentials generated and loaded") + model$dll_info <- inline::getDynLib(model$cf) } } # }}} |