improvements to new Date(time)vector classes

with thanks to @kevinushey

Author: eddelbuettel

inst/include/Rcpp/date_datetime/date_datetime.h

@@ -35,8 +35,8 @@ namespace Rcpp {
     // this will not be on by default 
     #if defined(RCPP_NEW_DATE_DATETIME_VECTORS)
 
-        typedef oldDateVector DateVector;
-        typedef oldDatetimeVector DatetimeVector;
+        typedef newDateVector DateVector;
+        typedef newDatetimeVector DatetimeVector;
 
     #else
 

inst/include/Rcpp/date_datetime/newDateVector.h

@@ -42,7 +42,8 @@ namespace Rcpp {
     private:
 
         void setClass() {
-            Rf_setAttrib(*this, R_ClassSymbol, Rf_mkString("Date"));
+            Shield<SEXP> dateclass(Rf_mkString("Date"));
+            Rf_setAttrib(*this, R_ClassSymbol, dateclass);
         }
     };
 }