add better error message for getArma

armstrtw · Apr 27, 2012 · 6ae4ff3 · 6ae4ff3
1 parent 9c60d7c
commit 6ae4ff3
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/src/interface.cpp b/src/interface.cpp
@@ -307,7 +307,13 @@ ArmaContext* getArma(SEXP x_) {
     }
     break;
   default:
-    throw std::logic_error("ERROR: conversion not supported.");
+    std::stringstream error_ss;
+    error_ss << "ERROR: (getArma) conversion not supported ";
+    error_ss << "TYPEOF: " << TYPEOF(x_);
+    // if(PRINTNAME(x_) != R_NilValue) {
+    //   error_ss << "variable: " << CHAR(PRINTNAME(x_));
+    // }
+    throw std::logic_error(error_ss.str());
   }
   return ap;
 }