[Rcpp-commits] r2855 - pkg/RcppBDT/src

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Sun Jan 9 00:55:31 CET 2011


Author: edd
Date: 2011-01-09 00:55:31 +0100 (Sun, 09 Jan 2011)
New Revision: 2855

Modified:
   pkg/RcppBDT/src/RcppBDT.cpp
Log:
correct NthDayOfWeek function which had arguments mixed


Modified: pkg/RcppBDT/src/RcppBDT.cpp
===================================================================
--- pkg/RcppBDT/src/RcppBDT.cpp	2011-01-08 23:29:50 UTC (rev 2854)
+++ pkg/RcppBDT/src/RcppBDT.cpp	2011-01-08 23:55:31 UTC (rev 2855)
@@ -114,8 +114,8 @@
     return Rcpp::wrap(ans_generator.get_date(year));
 }
 
-Rcpp::Date Date_nthDayOfWeek(boost::gregorian::date *d, int nthday, int mthweek, int mon, int year) {
-    nth_dow ans_generator(static_cast<boost::date_time::nth_kday_of_month<boost::gregorian::date>::week_num>(mthweek), nthday, mon);
+Rcpp::Date Date_nthDayOfWeek(boost::gregorian::date *d, int nthday, int dow, int mon, int year) {
+    nth_dow ans_generator(static_cast<boost::date_time::nth_kday_of_month<boost::gregorian::date>::week_num>(nthday), dow, mon);
     return Rcpp::wrap(ans_generator.get_date(year));
 }
 



More information about the Rcpp-commits mailing list