Example #1
0
void R_init_Biostrings(DllInfo *info)
{
    /* Lots of code around assumes that sizeof(Rbyte) == sizeof(char) */
    if (sizeof(Rbyte) != sizeof(char))
        error("sizeof(Rbyte) != sizeof(char)");
    _init_bytewise_match_tables();
    R_registerRoutines(info, cMethods, NULL, NULL, NULL);
    R_registerRoutines(info, NULL, callMethods, NULL, NULL);

    /* XString_class.c */
    REGISTER_CCALLABLE(_DNAencode);
    REGISTER_CCALLABLE(_DNAdecode);
    REGISTER_CCALLABLE(_RNAencode);
    REGISTER_CCALLABLE(_RNAdecode);

    /* XStringSet_class.c */
    REGISTER_CCALLABLE(_get_XStringSet_length);
    REGISTER_CCALLABLE(_get_XStringSet_xsbaseclassname);
    REGISTER_CCALLABLE(_hold_XStringSet);
    REGISTER_CCALLABLE(_get_length_from_XStringSet_holder);
    REGISTER_CCALLABLE(_get_elt_from_XStringSet_holder);
    REGISTER_CCALLABLE(_get_linear_subset_from_XStringSet_holder);
    REGISTER_CCALLABLE(_set_XStringSet_names);

    /* XStringSetList_class.c */
    REGISTER_CCALLABLE(_hold_XStringSetList);
    REGISTER_CCALLABLE(_get_length_from_XStringSetList_holder);
    REGISTER_CCALLABLE(_get_elt_from_XStringSetList_holder);

    /* match_reporting.c */
    REGISTER_CCALLABLE(_init_match_reporting);
    REGISTER_CCALLABLE(_set_active_PSpair);
    REGISTER_CCALLABLE(_set_match_shift);
    REGISTER_CCALLABLE(_report_match);
    REGISTER_CCALLABLE(_drop_reported_matches);
    REGISTER_CCALLABLE(_get_match_count);
    REGISTER_CCALLABLE(_reported_matches_asSEXP);

    /* MIndex_class.c */
    REGISTER_CCALLABLE(_hold_MIndex);
    REGISTER_CCALLABLE(_get_length_from_MIndex_holder);
    REGISTER_CCALLABLE(_get_width0_elt_from_MIndex_holder);
    REGISTER_CCALLABLE(_get_elt_from_MIndex_holder);

    /* match_pattern_boyermoore.c */
    REGISTER_CCALLABLE(_match_pattern_boyermoore);

    return;
}
Example #2
0
void R_init_IRanges(DllInfo *info)
{
	R_registerRoutines(info, NULL, callMethods, NULL, NULL);

/* Ranges_comparison.c */
	REGISTER_CCALLABLE(_overlap_code);
	REGISTER_CCALLABLE(_invert_overlap_code);

/* IRanges_class.c */
	REGISTER_CCALLABLE(_get_IRanges_start);
	REGISTER_CCALLABLE(_get_IRanges_width);
	REGISTER_CCALLABLE(_get_IRanges_names);
	REGISTER_CCALLABLE(_get_IRanges_length);
	REGISTER_CCALLABLE(_hold_IRanges);
	REGISTER_CCALLABLE(_get_length_from_IRanges_holder);
	REGISTER_CCALLABLE(_get_width_elt_from_IRanges_holder);
	REGISTER_CCALLABLE(_get_start_elt_from_IRanges_holder);
	REGISTER_CCALLABLE(_get_end_elt_from_IRanges_holder);
	REGISTER_CCALLABLE(_get_names_elt_from_IRanges_holder);
	REGISTER_CCALLABLE(_get_linear_subset_from_IRanges_holder);
	REGISTER_CCALLABLE(_set_IRanges_names);
	REGISTER_CCALLABLE(_copy_IRanges_slots);
	REGISTER_CCALLABLE(_new_IRanges);
	REGISTER_CCALLABLE(_new_IRanges_from_IntPairAE);
	REGISTER_CCALLABLE(_new_list_of_IRanges_from_IntPairAEAE);
	REGISTER_CCALLABLE(_alloc_IRanges);

/* Grouping_class.c */
	REGISTER_CCALLABLE(_get_H2LGrouping_high2low);
	REGISTER_CCALLABLE(_get_H2LGrouping_low2high);
	REGISTER_CCALLABLE(_get_Partitioning_names);
	REGISTER_CCALLABLE(_get_PartitioningByEnd_end);
	REGISTER_CCALLABLE(_new_PartitioningByEnd);

/* CompressedList_class.c */
	REGISTER_CCALLABLE(_get_CompressedList_unlistData);
	REGISTER_CCALLABLE(_get_CompressedList_partitioning);
	REGISTER_CCALLABLE(_get_CompressedList_length);
	REGISTER_CCALLABLE(_get_CompressedList_names);
	REGISTER_CCALLABLE(_new_CompressedList);
	REGISTER_CCALLABLE(_hold_CompressedIntegerList);
	REGISTER_CCALLABLE(_get_length_from_CompressedIntsList_holder);
	REGISTER_CCALLABLE(_get_elt_from_CompressedIntsList_holder);

/* CompressedIRangesList_class.c */
	REGISTER_CCALLABLE(_hold_CompressedIRangesList);
	REGISTER_CCALLABLE(_get_elt_from_CompressedIRangesList_holder);

/* RangedData_class.c */
	REGISTER_CCALLABLE(_new_RangedData);

	return;
}