[Rcpp-commits] r864 - scripts

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

Author: edd
Date: 2010-03-09 20:08:56 +0100 (Tue, 09 Mar 2010)
New Revision: 864

Modified:
   scripts/runBuild.sh
   scripts/runDoxygenAndZip.sh
   scripts/runExamples.sh
Log:
a few improvements to helper scripts


Modified: scripts/runBuild.sh
===================================================================
--- scripts/runBuild.sh	2010-03-09 17:05:39 UTC (rev 863)
+++ scripts/runBuild.sh	2010-03-09 19:08:56 UTC (rev 864)
@@ -1,10 +1,15 @@
 #!/bin/sh
 
-version=$(r -e'cat(as.character(read.dcf("pkg/DESCRIPTION")[,"Version"]))')
+if [ ! -d Rcpp ]; then
+    echo "Not above Rcpp/"
+    exit -1
+fi
+
+version=$(r -e'cat(as.character(read.dcf("Rcpp/DESCRIPTION")[,"Version"]))')
 echo "Working on version $version"
 
 export RCPP_CXX0X="yes"
-R CMD build --force pkg
+R CMD build --force Rcpp
 
 test -d tarballs   && cp -vax Rcpp_${version}.tar.gz tarballs/rcpp_${version}.orig.tar.gz
 test -d build-area && cp -vax Rcpp_${version}.tar.gz build-area/rcpp_${version}.orig.tar.gz

Modified: scripts/runDoxygenAndZip.sh
===================================================================
--- scripts/runDoxygenAndZip.sh	2010-03-09 17:05:39 UTC (rev 863)
+++ scripts/runDoxygenAndZip.sh	2010-03-09 19:08:56 UTC (rev 864)
@@ -1,8 +1,13 @@
 #!/bin/sh
 
+if [ ! -d Rcpp ]; then
+    echo "Not above Rcpp/"
+    exit -1
+fi
+
 cwd=$(pwd)
 
-version=$(r -e'cat(as.character(read.dcf("pkg/DESCRIPTION")[,"Version"]))')
+version=$(r -e'cat(as.character(read.dcf("Rcpp/DESCRIPTION")[,"Version"]))')
 echo "Working on version $version"
 
 

Modified: scripts/runExamples.sh
===================================================================
--- scripts/runExamples.sh	2010-03-09 17:05:39 UTC (rev 863)
+++ scripts/runExamples.sh	2010-03-09 19:08:56 UTC (rev 864)
@@ -3,45 +3,54 @@
 set -e 
 
 function runConvolveBennchmark {
-	cd Rcpp/inst/examples/ConvolveBenchmarks
-	./buildAndRun.sh
-	cd -
+    cd Rcpp/inst/examples/ConvolveBenchmarks
+    ./buildAndRun.sh
+    cd -
 }
 
 function runFastLM {
-	cd Rcpp/inst/examples/FastLM
-	./benchmark.r
-	cd -
+    cd Rcpp/inst/examples/FastLM
+    ./benchmark.r
+    cd -
 }
 
 function runFunctionCallback {
-	cd Rcpp/inst/examples/functionCallback
-	./buildAndRun.sh
-	./newApiExample.r
-	cd -
+    cd Rcpp/inst/examples/functionCallback
+    ./buildAndRun.sh
+    ./newApiExample.r
+    cd -
 }
 
 function runRcppInline {
-	cd Rcpp/inst/examples/RcppInline
-	./external_pointer.r
-	./RcppInlineExample.r
+    cd Rcpp/inst/examples/RcppInline
+    ./external_pointer.r
+    ./RcppInlineExample.r
     ./RcppInlineWithLibsExamples.r
     ./RcppSimpleExample.r
     ./RcppSimpleTests.r
     ./RObject.r
-	./UncaughtExceptions.r
-	cd -
+    ./UncaughtExceptions.r
+    cd -
 }
 
 function runRInsideExamples {
-	cd ../../rinside/pkg/inst/examples/standard
-	make 
-	cd -
+    cd ../../rinside/pkg/inst/examples/standard
+    make clean
+    make
+    ./rinside_sample0
+    ./rinside_sample1
+    ./rinside_sample2
+    ./rinside_sample3
+    ./rinside_sample4
+    ./rinside_sample5
+    ./rinside_sample6
+    ./rinside_sample7
+    ./rinside_sample8
+    cd -
 }
 
 runConvolveBennchmark
 runFastLM
 runFunctionCallback
 runRcppInline
-
 runRInsideExamples