1 #include <stdlib.h> // for NULL
2 #include <R_ext/Rdynload.h>
3
4 /* FIXME:
5 Check these declarations against the C/Fortran source code.
6 */
7
8 /* .C calls */
9 extern void lp_transbig(void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *);
10 extern void lpslink(void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *, void *);
11
12 static const R_CMethodDef CEntries[] = {
13 {"lp_transbig", (DL_FUNC) &lp_transbig, 20},
14 {"lpslink", (DL_FUNC) &lpslink, 28},
15 {NULL, NULL, 0}
16 };
17
R_init_lpSolve(DllInfo * dll)18 void R_init_lpSolve(DllInfo *dll)
19 {
20 R_registerRoutines(dll, CEntries, NULL, NULL, NULL);
21 R_useDynamicSymbols(dll, FALSE);
22 }
23