diff --git a/src/TMB/ll_gamma.hpp b/src/TMB/ll_gamma.hpp index dab2788f..613740b7 100644 --- a/src/TMB/ll_gamma.hpp +++ b/src/TMB/ll_gamma.hpp @@ -95,4 +95,3 @@ Type ll_gamma(objective_function* obj) // normal with parameters mu and lo #define TMB_OBJECTIVE_PTR this #endif - diff --git a/src/TMB/ssdtools_TMBExports.cpp b/src/TMB/ssdtools_TMBExports.cpp index 55a36425..9e53a929 100644 --- a/src/TMB/ssdtools_TMBExports.cpp +++ b/src/TMB/ssdtools_TMBExports.cpp @@ -52,7 +52,7 @@ Type objective_function::operator() () { } else if(model == "ll_weibull") { return ll_weibull(this); } else { - error("Unknown model."); + Rf_error("Unknown model."); } return 0; }