The R Project SVN R

Rev

Rev 52367 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 52367 Rev 55308
Line 1... Line -...
1 
#
 - 
 
2 
# ${R_HOME}/bin/Stangle
 1 
# ${R_HOME}/bin/Stangle -*- sh -*-
3 
 
 2 
 
4 
R_EXE="${R_HOME}/bin/R"
 3 
R_EXE="${R_HOME}/bin/R"
- 
 
 4 
 
- 
 
 5 
R_STANGLE_OPTIONS=${R_STANGLE_OPTIONS:='--vanilla --slave'}
- 
 
 6 
 
- 
 
 7 
args=
- 
 
 8 
while test -n "${1}"; do
- 
 
 9 
  ## quote each argument here, unquote in R code.
- 
 
 10 
  args="${args}nextArg${1}"
- 
 
 11 
  shift
- 
 
 12 
done
- 
 
 13 
 
5 
echo "utils:::.Stangle(\"$1\")" | "${R_EXE}" --vanilla --slave
 14 
echo "utils:::.Stangle()" | "${R_EXE}" $R_STANGLE_OPTIONS --args ${args}