Allow 'R' to come immediately after '***' for defining embedded R code chunks in sourceCpp

Author: jjallaire

ChangeLog

@@ -1,3 +1,8 @@
+2015-02-13  JJ Allaire  <[email protected]>
+
+        * src/attributes.cpp: Allow 'R' to come immediately after '***'
+        for defining embedded R code chunks in sourceCpp
+
 2015-02-12  JJ Allaire  <[email protected]>
 
         * DESCRIPTION: bump version

inst/NEWS.Rd

@@ -26,6 +26,8 @@
       \item Add rng parameter to Rcpp::export to prevent inclusion of
       RNGScope in generated code.
       \item Correctly detect Rtools 3.2
+      \item Allow 'R' to come immediately after '***' for defining 
+      embedded R code chunks in sourceCpp
     }
   }
 }

src/attributes.cpp

@@ -697,7 +697,7 @@ namespace attributes {
                                         Rcpp::CharacterVector linesVector,
                                         const std::deque<std::string>& lines) {
             Rcpp::List matches = regexMatches(linesVector,
-                                              "^\\s*/\\*{3,}\\s+[Rr]\\s*$");
+                                              "^\\s*/\\*{3,}\\s*[Rr]\\s*$");
             bool withinRBlock = false;
             CommentState commentState;
             std::vector<std::string> embeddedR;