X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=src%2Flexindex_stub.cpp;fp=src%2Flexindex_stub.cpp;h=315be7f31380d22e35681ef939983e5844f34312;hb=5f371ee50291faed9ae0514dfd4ba2aec87faea1;hp=00694b7c90b22d48f8d1aeba7aa009a2c8376840;hpb=ef481dfd7be52d928012f612f9016d31d9bf5122;p=SXSI%2Fxpathcomp.git diff --git a/src/lexindex_stub.cpp b/src/lexindex_stub.cpp index 00694b7..315be7f 100644 --- a/src/lexindex_stub.cpp +++ b/src/lexindex_stub.cpp @@ -114,12 +114,10 @@ ML_BINDING value caml_build_lex_index(value vtree, value vtag, value vtag2) tree = XMLTREE(vtree); tag = TAG(vtag); tag2 = TAG(vtag2); - //Uncomment the following and comment the failwith line //LEXINDEX(vindex) = ... return a lex_index* .... if ((tag==-1) || (tag2==-1)) caml_failwith(""); - preorderTraverse(0, tree->first_child(tree->ROOT)); sort(myvector.begin(), myvector.end(), myfunction); sort(myvector2.begin(), myvector2.end(), myfunction); @@ -134,8 +132,6 @@ 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"); - CAMLreturn (Val_unit); }