SCM

SCM Repository

[matrix] View of /pkg/Matrix/omit-SPQR-parts
ViewVC logotype

View of /pkg/Matrix/omit-SPQR-parts

Parent Directory Parent Directory | Revision Log Revision Log


Revision 2628 - (download) (annotate)
Sat Dec 11 16:56:51 2010 UTC (7 years ago) by mmaechler
File size: 1037 byte(s)
fix <ngCMatrix> %*% <dense> -- providing fast C-based coercions
#!/bin/sh
#
pkg=Matrix
lpkg=`echo $pkg | tr [:upper:] [:lower:]`
#
if [ ! -d $pkg ] ; then cd `dirname $0`/.. ; fi
if [ -d $pkg ]
then
 if [ -d $pkg/.svn ]
 then echo 'Ooooooooops!  not omitting inside svn checkout !!'"
Rather call $0 on directory  $pkg  produced by (something like)
   svn export svn://svn.r-forge.r-project.org/svnroot/${lpkg}/pkg $pkg
"
 else
  echo '' ; echo -n ' ** DROPPING the SPQR C++ parts .. '
  perl -pi -e 's{^}{## } if /spqr/i' $pkg/NAMESPACE
  perl -pi -e 's{^}{%% } if /spqr/i' $pkg/man/sparseQR-class.Rd
  perl -pi -e 's{define}{undef} if m{^#define Matrix_with_SPQR}' $pkg/src/Mutils.h
  for f in Makevars Makevars.win
  do if [ -e $pkg/src/$f ]
     then perl -pi -e 's{SPQR }{} if /SPQR/' $pkg/src/$f
     fi
  done
  for f in R/spqr.R man/spqr.Rd man/SPQR-class.Rd src/SPQR src/dummy.cpp
  do if [ -e $pkg/$f ]
     then mv $pkg/$f $pkg/${f}.~notyet~
     fi
  done
  echo ' [Done]'
 fi
else
  echo '***'" $0 error: "
  echo "  '$pkg' \*must\* be a subdirectory of the current directory (= `pwd`)"
fi

R-Forge@R-project.org
ViewVC Help
Powered by ViewVC 1.0.0  
Thanks to:
Vienna University of Economics and Business University of Wisconsin - Madison Powered By FusionForge