The R Project SVN R

Rev

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

Rev 83191 Rev 87901
Line 55... Line 55...
55
#else
55
#else
56
// for time_t
56
// for time_t
57
# include <time.h>
57
# include <time.h>
58
#endif
58
#endif
59
 
59
 
60
void attribute_hidden Init_R_Machine(SEXP rho)
60
attribute_hidden void Init_R_Machine(SEXP rho)
61
{
61
{
62
    machar(&R_AccuracyInfo.ibeta,
62
    machar(&R_AccuracyInfo.ibeta,
63
	   &R_AccuracyInfo.it,
63
	   &R_AccuracyInfo.it,
64
	   &R_AccuracyInfo.irnd,
64
	   &R_AccuracyInfo.irnd,
65
	   &R_AccuracyInfo.ngrd,
65
	   &R_AccuracyInfo.ngrd,