[Rprotobuf-commits] r680 - pkg/src

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Tue Dec 31 21:13:56 CET 2013


Author: murray
Date: 2013-12-31 21:13:55 +0100 (Tue, 31 Dec 2013)
New Revision: 680

Modified:
   pkg/src/extractors.cpp
Log:
Mark functions with extern C / RcppExport to match header.



Modified: pkg/src/extractors.cpp
===================================================================
--- pkg/src/extractors.cpp	2013-12-31 20:13:27 UTC (rev 679)
+++ pkg/src/extractors.cpp	2013-12-31 20:13:55 UTC (rev 680)
@@ -57,7 +57,7 @@
  * @return the field called "name" of the message if the
  *         message has the field, otherwise an error is generated
  */
-SEXP getMessageField(SEXP pointer, SEXP name) {
+RcppExport SEXP getMessageField(SEXP pointer, SEXP name) {
 
 #ifdef RPB_DEBUG
     Rprintf("<getMessageField>\n");
@@ -78,8 +78,8 @@
     return (extractFieldAsSEXP(message, field_desc));
 }
 
-SEXP extractFieldAsSEXP(const Rcpp::XPtr<GPB::Message>& message,
-                        const GPB::FieldDescriptor* fieldDesc) {
+RcppExport SEXP extractFieldAsSEXP(const Rcpp::XPtr<GPB::Message>& message,
+				   const GPB::FieldDescriptor* fieldDesc) {
     BEGIN_RCPP
     const Reflection* ref = message->GetReflection();
 



More information about the Rprotobuf-commits mailing list