The R Project SVN R

Rev

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

Rev 72986 Rev 83446
Line 40... Line 40...
40 
    initialized = 1;
 40 
    initialized = 1;
41 
    return;
 41 
    return;
42 
}
 42 
}
43 
 
 43 
 
44 
 
 44 
 
45 
SEXP attribute_hidden
 45 
attribute_hidden SEXP
46 
do_lapack(SEXP call, SEXP op, SEXP args, SEXP env)
 46 
do_lapack(SEXP call, SEXP op, SEXP args, SEXP env)
47 
{
 47 
{
48 
    checkArity(op, args);
 48 
    checkArity(op, args);
49 
    if(!initialized) La_Init();
 49 
    if(!initialized) La_Init();
50 
    if(initialized > 0)
 50 
    if(initialized > 0)