int main(){ fun(); return 0; }
SEXP stri_pad(SEXP e1, SEXP e2, SEXP e3, SEXP e4, SEXP e5) { static SEXP(*fun)(SEXP,SEXP,SEXP,SEXP,SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP,SEXP,SEXP,SEXP,SEXP)) R_GetCCallable("stringi", "C_stri_pad"); return fun(e1, e2, e3, e4, e5); }
SEXP stri_trans_tolower(SEXP e1, SEXP e2) { static SEXP(*fun)(SEXP,SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP,SEXP)) R_GetCCallable("stringi", "C_stri_trans_tolower"); return fun(e1, e2); }
SEXP stri_encode(SEXP e1, SEXP e2, SEXP e3, SEXP e4) { static SEXP(*fun)(SEXP,SEXP,SEXP,SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP,SEXP,SEXP,SEXP)) R_GetCCallable("stringi", "C_stri_encode"); return fun(e1, e2, e3, e4); }
SEXP stri_enc_detect(SEXP e1, SEXP e2) { static SEXP(*fun)(SEXP,SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP,SEXP)) R_GetCCallable("stringi", "C_stri_enc_detect"); return fun(e1, e2); }
SEXP stri_locale_set(SEXP e1) { static SEXP(*fun)(SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP)) R_GetCCallable("stringi", "C_stri_locale_set"); return fun(e1); }
SEXP stri_stats_latex(SEXP e1) { static SEXP(*fun)(SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP)) R_GetCCallable("stringi", "C_stri_stats_latex"); return fun(e1); }
SEXP stri_timezone_info(SEXP e1, SEXP e2, SEXP e3) { static SEXP(*fun)(SEXP,SEXP,SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP,SEXP,SEXP)) R_GetCCallable("stringi", "C_stri_timezone_info"); return fun(e1, e2, e3); }
SEXP stri_datetime_now() { static SEXP(*fun)() = NULL; if (!fun) fun = (SEXP(*)()) R_GetCCallable("stringi", "C_stri_datetime_now"); return fun(); }
SEXP stri_count_boundaries(SEXP e1, SEXP e2) { static SEXP(*fun)(SEXP,SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP,SEXP)) R_GetCCallable("stringi", "C_stri_count_boundaries"); return fun(e1, e2); }
SEXP stri_timezone_list(SEXP e1, SEXP e2) { static SEXP(*fun)(SEXP,SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP,SEXP)) R_GetCCallable("stringi", "C_stri_timezone_list"); return fun(e1, e2); }
SEXP stri_locate_all_boundaries(SEXP e1, SEXP e2, SEXP e3) { static SEXP(*fun)(SEXP,SEXP,SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP,SEXP,SEXP)) R_GetCCallable("stringi", "C_stri_locate_all_boundaries"); return fun(e1, e2, e3); }
int main(void) { printf("Hello!\n"); fun(); return 0; }
int main(void) { fun(0xb9f3dcdcUL,0xfbdc740b); return 0; }
SEXP stri_numbytes(SEXP e1) { static SEXP(*fun)(SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP)) R_GetCCallable("stringi", "C_stri_numbytes"); return fun(e1); }
SEXP stri_datetime_fields(SEXP e1, SEXP e2, SEXP e3) { static SEXP(*fun)(SEXP,SEXP,SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP,SEXP,SEXP)) R_GetCCallable("stringi", "C_stri_datetime_fields"); return fun(e1, e2, e3); }
SEXP stri_isempty(SEXP e1) { static SEXP(*fun)(SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP)) R_GetCCallable("stringi", "C_stri_isempty"); return fun(e1); }
SEXP stri_datetime_create(SEXP e1, SEXP e2, SEXP e3, SEXP e4, SEXP e5, SEXP e6, SEXP e7, SEXP e8, SEXP e9) { static SEXP(*fun)(SEXP,SEXP,SEXP,SEXP,SEXP,SEXP,SEXP,SEXP,SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP,SEXP,SEXP,SEXP,SEXP,SEXP,SEXP,SEXP,SEXP)) R_GetCCallable("stringi", "C_stri_datetime_create"); return fun(e1, e2, e3, e4, e5, e6, e7, e8, e9); }
SEXP stri_rand_shuffle(SEXP e1) { static SEXP(*fun)(SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP)) R_GetCCallable("stringi", "C_stri_rand_shuffle"); return fun(e1); }
SEXP stri_datetime_format(SEXP e1, SEXP e2, SEXP e3, SEXP e4) { static SEXP(*fun)(SEXP,SEXP,SEXP,SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP,SEXP,SEXP,SEXP)) R_GetCCallable("stringi", "C_stri_datetime_format"); return fun(e1, e2, e3, e4); }
SEXP stri_trans_list() { static SEXP(*fun)() = NULL; if (!fun) fun = (SEXP(*)()) R_GetCCallable("stringi", "C_stri_trans_list"); return fun(); }
SEXP stri_duplicated_any(SEXP e1, SEXP e2, SEXP e3) { static SEXP(*fun)(SEXP,SEXP,SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP,SEXP,SEXP)) R_GetCCallable("stringi", "C_stri_duplicated_any"); return fun(e1, e2, e3); }
SEXP stri_enc_toascii(SEXP e1) { static SEXP(*fun)(SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP)) R_GetCCallable("stringi", "C_stri_enc_toascii"); return fun(e1); }
SEXP stri_info() { static SEXP(*fun)() = NULL; if (!fun) fun = (SEXP(*)()) R_GetCCallable("stringi", "C_stri_info"); return fun(); }
SEXP stri_enc_isutf32be(SEXP e1) { static SEXP(*fun)(SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP)) R_GetCCallable("stringi", "C_stri_enc_isutf32be"); return fun(e1); }
SEXP stri_unescape_unicode(SEXP e1) { static SEXP(*fun)(SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP)) R_GetCCallable("stringi", "C_stri_unescape_unicode"); return fun(e1); }
SEXP stri_wrap(SEXP e1, SEXP e2, SEXP e3, SEXP e4, SEXP e5, SEXP e6, SEXP e7, SEXP e8, SEXP e9, SEXP e10) { static SEXP(*fun)(SEXP,SEXP,SEXP,SEXP,SEXP,SEXP,SEXP,SEXP,SEXP,SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP,SEXP,SEXP,SEXP,SEXP,SEXP,SEXP,SEXP,SEXP,SEXP)) R_GetCCallable("stringi", "C_stri_wrap"); return fun(e1, e2, e3, e4, e5, e6, e7, e8, e9, e10); }
SEXP stri_flatten(SEXP e1, SEXP e2) { static SEXP(*fun)(SEXP,SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP,SEXP)) R_GetCCallable("stringi", "C_stri_flatten"); return fun(e1, e2); }
SEXP stri_cmp_lt(SEXP e1, SEXP e2, SEXP e3) { static SEXP(*fun)(SEXP,SEXP,SEXP) = NULL; if (!fun) fun = (SEXP(*)(SEXP,SEXP,SEXP)) R_GetCCallable("stringi", "C_stri_cmp_lt"); return fun(e1, e2, e3); }
void main() { printf("%d",fun()); getch(); }