The R Project SVN R

Rev

Rev 4562 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 4562 Rev 4580
Line 9... Line 9...
9 
##  2) Wrapping every file in order to be more order independent
 9 
##  2) Wrapping every file in order to be more order independent
10 
##  3) appending a FOOTER ...
 10 
##  3) appending a FOOTER ...
11 
 
 11 
 
12 
## Should work WHEREVER this is called from :
 12 
## Should work WHEREVER this is called from :
13 
(cd `dirname $0`/..
 13 
(cd `dirname $0`/..
14 
 RHOME=`pwd`; export RHOME
 14 
 R_HOME=`pwd`; export R_HOME
15 
)
 15 
)
16 
RHOME=`cd ${RHOME}; pwd`	# absolute
 16 
R_HOME=`cd ${R_HOME}; pwd`	# absolute
17 
 
 17 
 
18 
PKG=$1; shift;
 18 
PKG=$1; shift;
19 
FILES="$@"
 19 
FILES="$@"
20 
 
 20 
 
21 
#Dbg> echo "RHOME=$RHOME"; echo
 21 
#Dbg> echo "R_HOME=$R_HOME"; echo
22 
#Dbg> echo "FILES=$FILES"; echo ; echo; exit
 22 
#Dbg> echo "FILES=$FILES"; echo ; echo; exit
23 
 
 23 
 
24 
## 1) ---- Header ----
 24 
## 1) ---- Header ----
25 
(cat <<_EOF_
 25 
(cat <<_EOF_
26 
.ptime <- proc.time()
 26 
.ptime <- proc.time()