R_init_graphics(DllInfo *dll)
{
R_registerRoutines(dll, NULL, CallEntries, NULL, ExtEntries);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, TRUE);
registerBase();
}
void R_init_gtools(DllInfo *info)
{
/* Register C routines */
R_registerRoutines (info, cMethods, NULL, NULL, NULL);
R_useDynamicSymbols(info, FALSE);
R_forceSymbols (info, TRUE);
}
void
attribute_visible
R_init_frailtypack(DllInfo *dll)
{
R_registerRoutines(dll, NULL, NULL, FortEntries, NULL);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, TRUE);
}
R_init_grid(DllInfo *dll)
{
/* No .C, .Fortran, or .External routines => NULL
*/
R_registerRoutines(dll, NULL, callMethods, NULL, NULL);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, FALSE);
}
void R_init_foreign(DllInfo *dll)
{
R_registerRoutines(dll, CEntries, CallEntries, NULL, ExtEntries);
R_useDynamicSymbols(dll, FALSE);
#if defined(R_VERSION) && R_VERSION >= R_Version(3, 0, 0)
R_forceSymbols(dll, TRUE);
#endif
}
void
R_init_causalTree(DllInfo * dll)
{
R_registerRoutines(dll, NULL, CallEntries, NULL, NULL);
R_useDynamicSymbols(dll, FALSE);
#if defined(R_VERSION) && R_VERSION >= R_Version(2, 16, 0)
R_forceSymbols(dll, TRUE);
#endif
}
void attribute_visible R_init_aster(DllInfo *info)
{
R_registerRoutines(info, cMethods, callMethods, NULL, NULL);
R_useDynamicSymbols(info, FALSE);
R_forceSymbols(info, TRUE);
R_RegisterCCallable("aster", "aster_mlogl_sat_unco",
(DL_FUNC) aster_mlogl_sat_unco);
R_RegisterCCallable("aster", "aster_mlogl_sat_cond",
(DL_FUNC) aster_mlogl_sat_cond);
}
void attribute_visible R_init_stats(DllInfo *dll)
{
R_registerRoutines(dll, CEntries, CallEntries, FortEntries, ExtEntries);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, TRUE);
R_RegisterCCallable("stats", "nlminb_iterate", (DL_FUNC) nlminb_iterate);
R_RegisterCCallable("stats", "nlsb_iterate", (DL_FUNC) nlsb_iterate);
R_RegisterCCallable("stats", "Rf_divset", (DL_FUNC) Rf_divset);
}
void R_init_gnm(DllInfo *info)
{
/* Register the C and .Call routines.
No .C(), .Fortran() or .External() routines,
so pass those arrays as NULL.
*/
R_registerRoutines(info,
NULL, callMethods,
NULL, NULL);
R_useDynamicSymbols(info, FALSE);
R_forceSymbols(info, TRUE);
}
void R_init_grDevices(DllInfo *dll)
{
initPalette();
R_registerRoutines(dll, NULL, CallEntries, NULL, ExtEntries);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, TRUE);
#ifdef HAVE_AQUA
/* R.app will run event loop, so if we are running under that we don't
need to run one here */
if(useaqua) setup_RdotApp();
#endif
}
void attribute_visible R_init_rstan(DllInfo *dll) {
R_registerRoutines(dll, NULL, CallEntries, NULL, NULL);
R_useDynamicSymbols(dll, FALSE);
// The call to R_useDynamicSymbols indicates that if the correct C
// entry point is not found in the shared library, then an error
// should be signaled. Currently, the default
// behavior in R is to search all other loaded shared libraries for the
// symbol, which is fairly dangerous behavior. If you have registered
// all routines in your library, then you should set this to FALSE
// as done in the stats package. [copied from `R Programming for
// Bioinformatics' // by Robert Gentleman]
#if defined(R_VERSION) && R_VERSION >= R_Version(2, 16, 0)
R_forceSymbols(dll, TRUE); // copied from package stats, don't know what it does.
#endif
}
extern "C" void R_init_smoothSurv(DllInfo *dll){
R_registerRoutines(dll, Centries, NULL, NULL, NULL);
/* .C .Call .Fortran .External
/* The following line makes only those routines defined above
available to outside packages, i.e., internal C++ things
are now invisible.
*/
R_useDynamicSymbols(dll, FALSE);
/*
** This line makes them only be available via the symbols above
** i.e., .C("bayesBisurvreg", ) won't work but .C(C_bayesBisurvreg, ) will
*/
R_forceSymbols(dll, TRUE);
}
void R_init_survival(DllInfo *dll){
R_registerRoutines(dll, Centries, Callentries, NULL, NULL);
/* The following line makes only those routines defined above
available to outside packages, i.e., internal things like
dmatrix() are now invisible.
*/
R_useDynamicSymbols(dll, FALSE);
/*
** This line makes them only be available via the symbols above
** i.e., .Call("tmerge", ) won't work but .Call(Ctmerge, ) will
** This feature was added in version 2.16
*/
#if defined(R_VERSION) && R_VERSION >= R_Version(2, 16, 0)
R_forceSymbols(dll, TRUE);
#endif
}
void R_init_gribr(DllInfo *info)
{
R_registerRoutines(info,
NULL,
callMethods,
NULL,
NULL);
R_useDynamicSymbols(info, FALSE);
R_forceSymbols(info, TRUE);
/* Here is where we could export the C routines
* so that other packages could call them from
* their C routines.
*
* E.g,
*
* R_RegisterCCallable("gribr","grib_open", (DL_FUNC) &gribr_grib_open);
*
*/
}
void R_init_PropClust(DllInfo *dll)
{
R_registerRoutines(dll, R_CMethods, NULL, R_FortranMethods, NULL);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, TRUE);
}
void R_init_IDPmisc(DllInfo *dll)
{
R_registerRoutines(dll, CEntries, NULL, NULL, NULL);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, TRUE);
}
void R_init_dtwSat(DllInfo *dll)
{
R_registerRoutines(dll, NULL, NULL, FortranEntries, NULL);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, FALSE);
}
void R_init_QuasiSeq(DllInfo *info)
{
R_registerRoutines(info, cMethods, callMethods, NULL, NULL);
R_useDynamicSymbols(info, FALSE);
R_forceSymbols(info, TRUE);
}
void attribute_visible R_init_diffHic(DllInfo *info)
{
R_registerRoutines(info, NULL, all_call_entries, NULL, NULL);
R_useDynamicSymbols(info, FALSE);
R_forceSymbols(info, TRUE);
}
void attribute_visible R_init_libcoinEx(DllInfo *dll) {
R_registerRoutines(dll, NULL, callMethods, NULL, NULL);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, TRUE);
}
void attribute_visible R_init_InteractionSet(DllInfo *dll) {
R_registerRoutines(dll, NULL, all_call_entries, NULL, NULL);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, TRUE);
}
void R_init_PReMiuM(DllInfo *dll)
{
R_registerRoutines(dll, NULL, R_CallDef, NULL, NULL);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, TRUE);
}
void R_init_myLib(DllInfo *info) {
R_registerRoutines(info, NULL, NULL, FortranEntries, NULL);
R_useDynamicSymbols(info, FALSE);
R_forceSymbols(info, TRUE);
}
void attribute_visible R_init_rgl(DllInfo *dll)
{
R_registerRoutines(dll, CEntries, CallEntries, NULL, ExtEntries);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, TRUE);
}
void R_init_lcmm(DllInfo * dll)
{
R_registerRoutines(dll, NULL, NULL, FortRout, NULL);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, TRUE);
}
RcppExport void R_init_wsrf(DllInfo *dll) {
R_registerRoutines(dll, NULL, callEntries, NULL, NULL);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, TRUE);
}
void attribute_visible R_init_largeList(DllInfo *dll) {
R_registerRoutines(dll, NULL, R_CallDef, NULL, NULL);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, TRUE);
}
void R_init_RODBC(DllInfo *dll)
{
R_registerRoutines(dll, NULL, CallEntries, NULL, NULL);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, TRUE);
}
void R_init_tcltk(DllInfo *dll)
{
R_registerRoutines(dll, CEntries, NULL, NULL, ExternEntries);
R_useDynamicSymbols(dll, FALSE);
R_forceSymbols(dll, FALSE);
}
void attribute_visible R_init_ribiosArg(DllInfo *info) {
R_registerRoutines(info, NULL, callMethods, NULL, NULL);
R_useDynamicSymbols(info, FALSE);
R_forceSymbols(info, TRUE);
}
