The R Project SVN R

Rev

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

Rev 2066 Rev 2531
Line 2... Line 2...
2 
# Diff  ``without R version''
 2 
# Diff  ``without R version''
3 
f1=$1
 3 
f1=$1
4 
f2=$2
 4 
f2=$2
5 
#$perlne="'print if /^Version|^Number of.*:/'"
 5 
#$perlne="'print if /^Version|^Number of.*:/'"
6 
#perl -ne "$perlne" $f1 ....
 6 
#perl -ne "$perlne" $f1 ....
7 
egrepv='(^Version|^Number of.*:)'
 7 
egrepv='(^Version|^Number of.*:'
- 
 
 8 
if test -n "`grep primitive-funs $f1`"
- 
 
 9 
 then egrepv=$egrepv'|^\[1\] [19][0-9][0-9])'
- 
 
 10 
 else egrepv=$egrepv')'
- 
 
 11 
fi
8 
egrep -v "$egrepv" $f1 > /tmp/${f1}-d
 12 
egrep -v "$egrepv" $f1 > /tmp/${f1}-d
9 
egrep -v "$egrepv" $f2 | diff -bw /tmp/${f1}-d -
 13 
egrep -v "$egrepv" $f2 | diff -bw /tmp/${f1}-d -