The R Project SVN R

Rev

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

Rev 59039 Rev 60268
Line 23... Line 23...
23
 
23
 
24
#ifdef HAVE_CONFIG_H
24
#ifdef HAVE_CONFIG_H
25
#  include <config.h>
25
#  include <config.h>
26
#endif
26
#endif
27
 
27
 
-
 
28
/* Required by C99 but might be slow */
-
 
29
#ifdef HAVE_LONG_DOUBLE
-
 
30
#  define LDOUBLE long double
-
 
31
#else
-
 
32
#  define LDOUBLE double
-
 
33
#endif
-
 
34
 
28
#include <math.h>
35
#include <math.h>
29
#include <float.h> /* DBL_MIN etc */
36
#include <float.h> /* DBL_MIN etc */
30
 
37
 
31
#include <Rconfig.h>
38
#include <Rconfig.h>
32
#include <Rmath.h>
39
#include <Rmath.h>
Line 185... Line 192...
185
double	attribute_hidden dpois_raw (double, double, int);
192
double	attribute_hidden dpois_raw (double, double, int);
186
double  attribute_hidden pnchisq_raw(double, double, double, double, double, int, Rboolean);
193
double  attribute_hidden pnchisq_raw(double, double, double, double, double, int, Rboolean);
187
double  attribute_hidden pgamma_raw(double, double, int, int);
194
double  attribute_hidden pgamma_raw(double, double, int, int);
188
double	attribute_hidden pbeta_raw(double, double, double, int, int);
195
double	attribute_hidden pbeta_raw(double, double, double, int, int);
189
double  attribute_hidden qchisq_appr(double, double, double, int, int, double tol);
196
double  attribute_hidden qchisq_appr(double, double, double, int, int, double tol);
190
long double attribute_hidden pnbeta_raw(double, double, double, double, double);
197
LDOUBLE attribute_hidden pnbeta_raw(double, double, double, double, double);
191
double	attribute_hidden pnbeta2(double, double, double, double, double, int, int);
198
double	attribute_hidden pnbeta2(double, double, double, double, double, int, int);
192
 
199
 
193
int	Rf_i1mach(int);
200
int	Rf_i1mach(int);
194
 
201
 
195
/* From toms708.c */
202
/* From toms708.c */