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 gee_rap(SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP);
12 extern SEXP infls_rap(SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP);
13 extern SEXP ordgee_rap(SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP);
14 
15 static const R_CallMethodDef CallEntries[] = {
16     {"gee_rap",    (DL_FUNC) &gee_rap,    14},
17     {"infls_rap",  (DL_FUNC) &infls_rap,  14},
18     {"ordgee_rap", (DL_FUNC) &ordgee_rap, 14},
19     {NULL, NULL, 0}
20 };
21 
R_init_geepack(DllInfo * dll)22 void R_init_geepack(DllInfo *dll)
23 {
24     R_registerRoutines(dll, NULL, CallEntries, NULL, NULL);
25     R_useDynamicSymbols(dll, FALSE);
26 }
27