The R Project SVN R

Rev

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

Rev 44201 Rev 45070
Line 50... Line 50...
50 
    strcpy(optfl,fname);
 50 
    strcpy(optfl,fname);
51 
    optln = 0;
 51 
    optln = 0;
52 
    return 1;
 52 
    return 1;
53 
}
 53 
}
54 
 
 54 
 
55 
 
 - 
 
56 
 
 - 
 
57 
char *
 55 
char *
58 
optfile(void)
 56 
optfile(void)
59 
{
 57 
{
60 
    return optfl;
 58 
    return optfl;
61 
}
 59 
}
62 
 
 60 
 
63 
int
61 
int
64 
optline(void)
 62 
optline(void)
65 
{
 63 
{
66 
    return optln;
 64 
    return optln;
67 
}
 65 
}
68 
 
 66