1
/* This file has been generated from
6
/* --------------------------------------------------------------------------------
8
* Purpose : some input for arb_proto_2_xsub unit-test
9
* -------------------------------------------------------------------------------- */
12
#error please compile as C++
17
static GB_shell4perl perl_shell;
19
/* --------------------------------------------------------------------------------
20
* the following functions are hand-coded in ARB.default.xs:
23
MODULE = FAKE PACKAGE = ARB PREFIX = P2A_
27
MODULE = FAKE PACKAGE = BIO PREFIX = P2AT_
30
# --------------------------------------------------------------------------------
31
# functions below are auto-generated by ../../../PERLTOOLS/arb_proto_2_xsub.cxx
32
# using prototypes from ptype.header
33
# --------------------------------------------------------------------------------
35
# --------------------------------------------------------------------------------
36
MODULE = ARB PACKAGE = ARB PREFIX = P2A_
39
P2A_get_type_name(gbd)
43
RETVAL = const_cast<char *>(GB_get_type_name(gbd));
58
P2A_fix_database(gb_main)
62
RETVAL = const_cast<char *>(GB_fix_database(gb_main));
76
P2A_set_next_main_idx(idx)
80
GB_set_next_main_idx(idx);
89
RETVAL = GB_open(const_cast<const char *>(path), const_cast<const char *>(opent));
96
P2A_delete_database(filename)
100
RETVAL = const_cast<char *>(GB_delete_database(const_cast<const char *>(filename)));
107
P2A_set_cache_size(gbd, size)
112
freeset(static_pntr, GB_set_cache_size(gbd, size));
113
RETVAL = static_pntr;
120
P2A_create_index(gbd, key, case_sens, estimated_size)
127
RETVAL = const_cast<char *>(GB_create_index(gbd, const_cast<const char *>(key), GBP_charPtr_2_GB_CASE(const_cast<const char *>(case_sens)), estimated_size));
134
P2A_request_undo_type(gb_main, type)
139
RETVAL = const_cast<char *>(GB_request_undo_type(gb_main, GBP_charPtr_2_GB_UNDO_TYPE(const_cast<const char *>(type))));
146
P2A_get_requested_undo_type(gb_main)
150
RETVAL = const_cast<char *>(GBP_GB_UNDO_TYPE_2_charPtr(GB_get_requested_undo_type(gb_main)));
157
P2A_undo(gb_main, type)
162
RETVAL = const_cast<char *>(GB_undo(gb_main, GBP_charPtr_2_GB_UNDO_TYPE(const_cast<const char *>(type))));
169
P2A_find(gbd, key, gbs)
175
RETVAL = GB_find(gbd, const_cast<const char *>(key), GBP_charPtr_2_GB_SEARCH_TYPE(const_cast<const char *>(gbs)));
182
P2A_find_string(gbd, key, str, case_sens, gbs)
190
RETVAL = GB_find_string(gbd, const_cast<const char *>(key), const_cast<const char *>(str), GBP_charPtr_2_GB_CASE(const_cast<const char *>(case_sens)), GBP_charPtr_2_GB_SEARCH_TYPE(const_cast<const char *>(gbs)));
197
P2A_command_interpreter(gb_main, str, commands, gbd, default_tree_name)
202
char *default_tree_name
205
freeset(static_pntr, GB_command_interpreter(gb_main, const_cast<const char *>(str), const_cast<const char *>(commands), gbd, const_cast<const char *>(default_tree_name)));
206
RETVAL = static_pntr;
216
RETVAL = GB_time_of_day();
227
RETVAL = GB_atof(const_cast<const char *>(str));
238
RETVAL = const_cast<char *>(GBP_GB_TYPES_2_charPtr(GB_read_type(gbd)));
245
P2A_create(father, key, type)
251
RETVAL = GB_create(father, const_cast<const char *>(key), GBP_charPtr_2_GB_TYPES(const_cast<const char *>(type)));
257
# --------------------------------------------------------------------------------
258
MODULE = ARB PACKAGE = BIO PREFIX = P2AT_
261
P2AT_is_genome_db(gb_main, default_value)
266
RETVAL = GEN_is_genome_db(gb_main, default_value);
273
P2AT_origin_organism(gb_pseudo)
277
RETVAL = const_cast<char *>(GEN_origin_organism(gb_pseudo));
284
P2AT_get_organism_count(gb_main)
288
RETVAL = GEN_get_organism_count(gb_main);
295
P2AT_global_gene_identifier(gb_gene, gb_organism)
300
freeset(static_pntr, GEN_global_gene_identifier(gb_gene, gb_organism));
301
RETVAL = static_pntr;
308
P2AT_check_arb_file(name)
312
RETVAL = const_cast<char *>(GBT_check_arb_file(const_cast<const char *>(name)));
319
P2AT_get_type_of_changekey(gb_main, field_name, change_key_path)
322
char *change_key_path
325
RETVAL = const_cast<char *>(GBP_GB_TYPES_2_charPtr(GBT_get_type_of_changekey(gb_main, const_cast<const char *>(field_name), const_cast<const char *>(change_key_path))));
332
P2AT_write_sequence(gb_data, ali_name, ali_len, sequence)
339
RETVAL = const_cast<char *>(GBT_write_sequence(gb_data, const_cast<const char *>(ali_name), ali_len, const_cast<const char *>(sequence)));