1
#include <R.h>
2
#include <Rinternals.h>
3
#include <stdlib.h> // for NULL
4
#include <R_ext/Rdynload.h>
5

6
/* FIXME: 
7
   Check these declarations against the C/Fortran source code.
8
*/
9

10
/* .Call calls */
11
extern SEXP _raptr_rcpp_append_model_object(SEXP, SEXP);
12
extern SEXP _raptr_rcpp_calcBoundaryDF(SEXP, SEXP, SEXP, SEXP);
13
extern SEXP _raptr_rcpp_dump_character_object(SEXP);
14
extern SEXP _raptr_rcpp_dump_integer_object(SEXP);
15
extern SEXP _raptr_rcpp_dump_numeric_object(SEXP);
16
extern SEXP _raptr_rcpp_extract_model_object(SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP);
17
extern SEXP _raptr_rcpp_generate_model_object(SEXP, SEXP, SEXP, SEXP);
18
extern SEXP _raptr_rcpp_groupcombine(SEXP);
19
extern SEXP _raptr_rcpp_groupmean(SEXP, SEXP);
20
extern SEXP _raptr_rcpp_Polygons2PolySet(SEXP, SEXP);
21
extern SEXP _raptr_rcpp_proportion_held(SEXP, SEXP, SEXP);
22
extern SEXP _raptr_rcpp_rrap_proportion_held(SEXP, SEXP, SEXP, SEXP, SEXP, SEXP);
23
extern SEXP _raptr_rcpp_rrap_squared_distance(SEXP, SEXP, SEXP, SEXP, SEXP, SEXP);
24
extern SEXP _raptr_rcpp_squared_distance(SEXP, SEXP, SEXP);
25
extern SEXP _raptr_rcpp_sum_duplicates(SEXP, SEXP, SEXP);
26

27
static const R_CallMethodDef CallEntries[] = {
28
    {"_raptr_rcpp_append_model_object",   (DL_FUNC) &_raptr_rcpp_append_model_object,   2},
29
    {"_raptr_rcpp_calcBoundaryDF",        (DL_FUNC) &_raptr_rcpp_calcBoundaryDF,        4},
30
    {"_raptr_rcpp_dump_character_object", (DL_FUNC) &_raptr_rcpp_dump_character_object, 1},
31
    {"_raptr_rcpp_dump_integer_object",   (DL_FUNC) &_raptr_rcpp_dump_integer_object,   1},
32
    {"_raptr_rcpp_dump_numeric_object",   (DL_FUNC) &_raptr_rcpp_dump_numeric_object,   1},
33
    {"_raptr_rcpp_extract_model_object",  (DL_FUNC) &_raptr_rcpp_extract_model_object,  7},
34
    {"_raptr_rcpp_generate_model_object", (DL_FUNC) &_raptr_rcpp_generate_model_object, 4},
35
    {"_raptr_rcpp_groupcombine",          (DL_FUNC) &_raptr_rcpp_groupcombine,          1},
36
    {"_raptr_rcpp_groupmean",             (DL_FUNC) &_raptr_rcpp_groupmean,             2},
37
    {"_raptr_rcpp_Polygons2PolySet",      (DL_FUNC) &_raptr_rcpp_Polygons2PolySet,      2},
38
    {"_raptr_rcpp_proportion_held",       (DL_FUNC) &_raptr_rcpp_proportion_held,       3},
39
    {"_raptr_rcpp_rrap_proportion_held",  (DL_FUNC) &_raptr_rcpp_rrap_proportion_held,  6},
40
    {"_raptr_rcpp_rrap_squared_distance", (DL_FUNC) &_raptr_rcpp_rrap_squared_distance, 6},
41
    {"_raptr_rcpp_squared_distance",      (DL_FUNC) &_raptr_rcpp_squared_distance,      3},
42
    {"_raptr_rcpp_sum_duplicates",        (DL_FUNC) &_raptr_rcpp_sum_duplicates,        3},
43
    {NULL, NULL, 0}
44
};
45

46
void R_init_raptr(DllInfo *dll)
47
{
48
    R_registerRoutines(dll, NULL, CallEntries, NULL, NULL);
49
    R_useDynamicSymbols(dll, FALSE);
50
}

Read our documentation on viewing source code .

Loading