-a#include <cstring>
+#include <cstring>
#include <utility>
#include <algorithm>
#include <vector>
} myobject;
//define a type for the lexicographic index
-
class lex_index {
public:
//The tag IDs
vector<int32_t>::iterator tagVectorIt;
vector<int32_t> tag2Vector;
vector<int32_t>::iterator tag2VectorIt;
+ void print();
};
+void lex_index::print(){printf("Print called\n");}
+
// class prefix_treeNode {
// public:
// std::map<char, prefix_treeNode> Children;
//Uncomment the following and comment the failwith line
//LEXINDEX(vindex) = ... return a lex_index* ....
+ LEXINDEX(vindex)=mylindex;
}
ML_BINDING value caml_print_lex_index(value vindex)
lex_index* index = LEXINDEX(vindex);
//Print the index to the terminal
- caml_failwith("print_lex_index not implemented");
+ // caml_failwith("print_lex_index not implemented");
+ index->print();
CAMLreturn (Val_unit);
}