static SEXP _tmpl_DNAStringSet()
{
CharAEAE *aeae = new_CharAEAE(0, 0);
SEXP lkup = PROTECT(_get_lkup("DNAString"));
SEXP ans = new_XRawList_from_CharAEAE("DNAStringSet", "DNAString",
aeae, lkup);
UNPROTECT(1);
return ans;
}
static FASTAINDEX_loaderExt new_FASTAINDEX_loaderExt()
{
FASTAINDEX_loaderExt loader_ext;
loader_ext.recno_buf = new_IntAE(0, 0, 0);
loader_ext.offset_buf = new_LLongAE(0, 0, 0);
loader_ext.desc_buf = new_CharAEAE(0, 0);
loader_ext.seqlength_buf = new_IntAE(0, 0, 0);
return loader_ext;
}
static FASTQ_loaderExt new_FASTQ_loaderExt(SEXP ans, SEXP lkup)
{
FASTQ_loaderExt loader_ext;
loader_ext.ans_names_buf =
new_CharAEAE(_get_XStringSet_length(ans), 0);
loader_ext.ans_holder = hold_XVectorList(ans);
if (lkup == R_NilValue) {
loader_ext.lkup = NULL;
loader_ext.lkup_length = 0;
} else {
loader_ext.lkup = INTEGER(lkup);
loader_ext.lkup_length = LENGTH(lkup);
}
return loader_ext;
}
static SEXP _tmpl_BStringSet()
{
CharAEAE *aeae = new_CharAEAE(0, 0);
return new_XRawList_from_CharAEAE("BStringSet", "BString", aeae,
R_NilValue);
}
