From e0bfc03386809f0844cb9d2e74e9edc5a505c668 Mon Sep 17 00:00:00 2001
From: Joe Thorley <joe@poissonconsulting.ca>
Date: Sat, 28 Sep 2024 11:17:58 -0700
Subject: [PATCH] C++ error() to Rf_error()

---
 src/TMB/ll_gamma.hpp            | 1 -
 src/TMB/ssdtools_TMBExports.cpp | 2 +-
 2 files changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/TMB/ll_gamma.hpp b/src/TMB/ll_gamma.hpp
index dab2788f6..613740b75 100644
--- a/src/TMB/ll_gamma.hpp
+++ b/src/TMB/ll_gamma.hpp
@@ -95,4 +95,3 @@ Type ll_gamma(objective_function<Type>* 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 55a364251..9e53a9292 100644
--- a/src/TMB/ssdtools_TMBExports.cpp
+++ b/src/TMB/ssdtools_TMBExports.cpp
@@ -52,7 +52,7 @@ Type objective_function<Type>::operator() () {
   } else if(model == "ll_weibull") {
     return ll_weibull(this);
   } else {
-    error("Unknown model.");
+    Rf_error("Unknown model.");
   }
   return 0;
 }