X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=OCamlDriver.cpp;fp=OCamlDriver.cpp;h=0e3af1225f163b66b426b3b3e7fd14782f2edd25;hb=c02900bb9b9ecd87ab08465f7dad36dd7cd34d50;hp=a5e47f807996faca481ca350413fbc020b378b8f;hpb=0c2338bfcdae0df1c68112a10247dc4e68a483ff;p=SXSI%2Fxpathcomp.git diff --git a/OCamlDriver.cpp b/OCamlDriver.cpp index a5e47f8..0e3af12 100644 --- a/OCamlDriver.cpp +++ b/OCamlDriver.cpp @@ -786,7 +786,7 @@ extern "C" value caml_benchmark_jump(value tree,value tag){ treeNode root = XMLTREE(tree)->FirstChild(0); root = XMLTREE(tree)->FirstChild(root); count = iterjump(XMLTREE(tree), root , Int_val(tag),0); - return Val_unit; + return Val_int(count); } int iterfcns(XMLTree* tree, treeNode node){