whitespace

Author: eddelbuettel

inst/skeleton/rcpp_hello_world.R

@@ -1,5 +1,5 @@
 
-rcpp_hello_world <- function(){
-	.Call( "rcpp_hello_world", PACKAGE = "@PKG@" )
+rcpp_hello_world <- function() {
+    .Call("rcpp_hello_world", PACKAGE = "@PKG@")
 }
 

inst/skeleton/rcpp_module.cpp

@@ -25,29 +25,29 @@ std::string hello() {
     throw std::range_error( "boom" ) ;
 }
 
-int bar( int x){
-    return x*2 ;
+int bar(int x) {
+    return x*2;
 }
 
-double foo( int x, double y){
-    return x * y ;
+double foo(int x, double y) {
+    return x * y;
 }
 
-void bla( ){
-    Rprintf( "hello\\n" ) ;
+void bla() {
+    Rprintf("hello\\n");
 }
 
-void bla1( int x){
-    Rprintf( "hello (x = %d)\\n", x ) ;
+void bla1(int x) {
+    Rprintf("hello (x = %d)\\n", x);
 }
 
-void bla2( int x, double y){
-    Rprintf( "hello (x = %d, y = %5.2f)\\n", x, y ) ;
+void bla2( int x, double y) {
+    Rprintf("hello (x = %d, y = %5.2f)\\n", x, y);
 }
 
 class World {
 public:
-    World() : msg("hello"){}
+    World() : msg("hello") {}
     void set(std::string msg) { this->msg = msg; }
     std::string greet() { return msg; }
 
@@ -60,25 +60,25 @@ class World {
 RCPP_MODULE(yada){
     using namespace Rcpp ;
 
-    function( "hello" , &hello  , "documentation for hello " );
-    function( "bla"   , &bla    , "documentation for bla " );
-    function( "bla1"  , &bla1   , "documentation for bla1 " );
-    function( "bla2"  , &bla2   , "documentation for bla2 " );
+    function("hello" , &hello  , "documentation for hello ");
+    function("bla"   , &bla    , "documentation for bla ");
+    function("bla1"  , &bla1   , "documentation for bla1 ");
+    function("bla2"  , &bla2   , "documentation for bla2 ");
 
     // with formal arguments specification
-    function( "bar"   , &bar    , 
-              List::create( _["x"] = 0.0 ), 
-              "documentation for bar " ) ;
-    function( "foo"   , &foo    , 
-              List::create( _["x"] = 1, _["y"] = 1.0 ),
-              "documentation for foo " ) ;	
+    function("bar"   , &bar    , 
+             List::create( _["x"] = 0.0), 
+             "documentation for bar ");
+    function("foo"   , &foo    , 
+             List::create( _["x"] = 1, _["y"] = 1.0),
+             "documentation for foo ");	
 
-    class_<World>( "World" )
+    class_<World>("World")
     // expose the default constructor
     .constructor()    
 
-    .method( "greet", &World::greet , "get the message" )
-    .method( "set", &World::set     , "set the message" )
+    .method("greet", &World::greet , "get the message")
+    .method("set", &World::set     , "set the message")
     ;
 }