[Rcpp-commits] r2600 - in pkg/Rcpp: . R

[noreply at r-forge.r-project.org]

Author: romain
Date: 2010-11-29 19:36:43 +0100 (Mon, 29 Nov 2010)
New Revision: 2600

Modified:
   pkg/Rcpp/ChangeLog
   pkg/Rcpp/R/Module.R
Log:
workaround

Modified: pkg/Rcpp/ChangeLog
===================================================================
--- pkg/Rcpp/ChangeLog	2010-11-29 17:25:11 UTC (rev 2599)
+++ pkg/Rcpp/ChangeLog	2010-11-29 18:36:43 UTC (rev 2600)
@@ -2,6 +2,10 @@
 
     * inst/include/Rcpp/vector/Vector.h: trying to please suncc after CRAN checks
 
+    * R/Module.R: protect the module$refClassGenerators <- generators line against
+    the case where there are no classes (triggered a problem with the parser 
+    package)
+    
 2010-11-27  Dirk Eddelbuettel  <edd at debian.org>
 
 	* DESCRIPTION: Release 0.8.9

Modified: pkg/Rcpp/R/Module.R
===================================================================
--- pkg/Rcpp/R/Module.R	2010-11-29 17:25:11 UTC (rev 2599)
+++ pkg/Rcpp/R/Module.R	2010-11-29 18:36:43 UTC (rev 2600)
@@ -229,7 +229,9 @@
             
         }
     }
-    module$refClassGenerators <- generators
+    if(length(classes)) {
+        module$refClassGenerators <- generators
+    }
     
     for( i in seq_along(classes) ){
         clname <- as.character(classes[[i]])