The R Project SVN R

Rev

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

Rev 87903 Rev 87907
Line 24... Line 24...
24 
/* Not part of the API, not callable from C++ */
 24 
/* Not part of the API, not callable from C++ */
25 
 
 25 
 
26 
#include <Rconfig.h>
 26 
#include <Rconfig.h>
27 
#include <Rinternals.h>
 27 
#include <Rinternals.h>
28 
#include <R_ext/Rdynload.h>
 28 
#include <R_ext/Rdynload.h>
- 
 
 29 
#include <R_ext/Visibility.h>
29 
#include <R_ext/stats_package.h>
 30 
#include <R_ext/stats_package.h>
30 
 
 31 
 
- 
 
 32 
/*
31 
#ifdef HAVE_VISIBILITY_ATTRIBUTE
 33 
#ifdef HAVE_VISIBILITY_ATTRIBUTE
32 
# define attribute_hidden __attribute__ ((visibility ("hidden")))
 34 
# define attribute_hidden __attribute__ ((visibility ("hidden")))
33 
#else
 35 
#else
34 
# define attribute_hidden
 36 
# define attribute_hidden
35 
#endif
 37 
#endif
- 
 
 38 
*/
36 
 
 39 
 
37 
attribute_hidden void
 40 
attribute_hidden void
38 
S_Rf_divset(int alg, int iv[], int liv, int lv, double v[])
 41 
S_Rf_divset(int alg, int iv[], int liv, int lv, double v[])
39 
{
 42 
{
40 
    static void(*fun)(int,int[],int,int,double[]) = NULL;
 43 
    static void(*fun)(int,int[],int,int,double[]) = NULL;