The R Project SVN R

Rev

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

Rev 71334 Rev 83446
Line 134... Line 134...
134 
    }
 134 
    }
135 
#endif
 135 
#endif
136 
    return ans;
 136 
    return ans;
137 
}
 137 
}
138 
 
 138 
 
139 
SEXP attribute_hidden do_systime(SEXP call, SEXP op, SEXP args, SEXP env)
 139 
attribute_hidden SEXP do_systime(SEXP call, SEXP op, SEXP args, SEXP env)
140 
{
 140 
{
141 
    checkArity(op, args);
 141 
    checkArity(op, args);
142 
    return ScalarReal(currentTime());
 142 
    return ScalarReal(currentTime());
143 
}
 143 
}
144 
 
 144