The R Project SVN R

Rev

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

Rev 11550 Rev 11741
Line 9... Line 9...
9 
exitstatus=${3}
 9 
exitstatus=${3}
10 
 
 10 
 
11 
## sed script to get rid of the startup message
 11 
## sed script to get rid of the startup message
12 
script='/^R : Copyright/,/quit R.$/{d;}'
 12 
script='/^R : Copyright/,/quit R.$/{d;}'
13 
## egrep pattern to get rid of some more???
 13 
## egrep pattern to get rid of some more???
14 
pattern='(^Number of.*:|^Time '
 14 
pattern='(^Number of.*:|^Time |^Loading required package.*'
15 
if test -n "`echo ${ffile} | grep primitive-funs`"; then
 15 
if test -n "`echo ${ffile} | grep primitive-funs`"; then
16 
  pattern=${pattern}'|^\[1\] [19][0-9][0-9])'
 16 
  pattern=${pattern}'|^\[1\] [19][0-9][0-9])'
17 
else
 17 
else
18 
  pattern=${pattern}')'
 18 
  pattern=${pattern}')'
19 
fi
 19 
fi