src/init.c
0710eb77
 #include <R.h>
 #include <R_ext/Rdynload.h>
 #include "crlmm.h"
a3b625d4
 #include <Rinternals.h>
 #include <R_ext/Rdynload.h>
0710eb77
 
 static const R_CallMethodDef CallEntries[] = {
     {"gtypeCallerPart1", (DL_FUNC)&gtypeCallerPart1, 17},
     {"gtypeCallerPart2", (DL_FUNC)&gtypeCallerPart2, 19},
b6f0c388
     {"normalizeBAF", (DL_FUNC)&normalizeBAF, 2},
0710eb77
     {NULL, NULL, 0}
 };
 
a0b9555f
 void R_init_crlmm(DllInfo *dll){
af08b5d6
     R_registerRoutines(dll, NULL, CallEntries, NULL, NULL);
0710eb77
 }
a3b625d4
 
 
 SEXP subColSummarizeMedianPP(SEXP RMatrix, SEXP R_rowIndexList){
   static SEXP(*fun)(SEXP, SEXP) = NULL;
   if (fun == NULL)
     fun =  (SEXP(*)(SEXP, SEXP))R_GetCCallable("preprocessCore","R_subColSummarize_median");
   return fun(RMatrix, R_rowIndexList);
 }