interrogatedb: Add functions to obtain getters of make-seqs

This commit is contained in:
rdb 2022-07-24 21:37:44 +02:00
parent 33691d72ec
commit cb400b5e17
2 changed files with 14 additions and 2 deletions

View File

@ -494,11 +494,22 @@ interrogate_make_seq_num_name(MakeSeqIndex make_seq) {
const char *
interrogate_make_seq_element_name(MakeSeqIndex make_seq) {
// cerr << "interrogate_make_seq_element_name(" << make_seq << ")\n";
static string result;
FunctionIndex function = InterrogateDatabase::get_ptr()->get_make_seq(make_seq).get_element_getter();
return interrogate_function_name(function);
}
FunctionIndex
interrogate_make_seq_num_getter(MakeSeqIndex make_seq) {
// cerr << "interrogate_make_seq_num_getter(" << make_seq << ")\n";
return InterrogateDatabase::get_ptr()->get_make_seq(make_seq).get_length_getter();
}
FunctionIndex
interrogate_make_seq_element_getter(MakeSeqIndex make_seq) {
// cerr << "interrogate_make_seq_element_getter(" << make_seq << ")\n";
return InterrogateDatabase::get_ptr()->get_make_seq(make_seq).get_element_getter();
}
int
interrogate_number_of_global_types() {
// cerr << "interrogate_number_of_global_types()\n";

View File

@ -348,7 +348,8 @@ EXPCL_INTERROGATEDB const char *interrogate_make_seq_comment(ElementIndex elemen
EXPCL_INTERROGATEDB const char *interrogate_make_seq_num_name(MakeSeqIndex make_seq);
// The name of the real method that returns the nth element, e.g. "get_thing"
EXPCL_INTERROGATEDB const char *interrogate_make_seq_element_name(MakeSeqIndex make_seq);
EXPCL_INTERROGATEDB FunctionIndex interrogate_make_seq_num_getter(MakeSeqIndex make_seq);
EXPCL_INTERROGATEDB FunctionIndex interrogate_make_seq_element_getter(MakeSeqIndex make_seq);
// Types