The R Project SVN R

Rev

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

Rev 46994 Rev 47125
Line 23... Line 23...
23 
use Getopt::Long;
 23 
use Getopt::Long;
24 
use R::Rdconv;
 24 
use R::Rdconv;
25 
use R::Utils;
 25 
use R::Utils;
26 
use R::Vars;
 26 
use R::Vars;
27 
 
 27 
 
28 
my $revision = ' $Rev: 46994 $ ';
 28 
my $revision = ' $Rev: 47125 $ ';
29 
my $version;
 29 
my $version;
30 
my $name;
 30 
my $name;
31 
 
 31 
 
- 
 
 32 
## switch on autoflushing for STDOUT.  We want this as we
- 
 
 33 
## write to both STDERR (warnings) and STDOUT.
- 
 
 34 
$| = 1;
- 
 
 35 
 
32 
$revision =~ / ([\d\.]*) /;
 36 
$revision =~ / ([\d\.]*) /;
33 
$version = $1;
 37 
$version = $1;
34 
($name = $0) =~ s|.*/||;
 38 
($name = $0) =~ s|.*/||;
35 
 
 39 
 
36 
## <NOTE>
 40 
## <NOTE>