projects
/
SXSI
/
xpathcomp.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
90c98ae
)
.
author
kim
<kim@3cdefd35-fc62-479d-8e8d-bae585ffb9ca>
Mon, 7 Feb 2011 13:23:24 +0000
(13:23 +0000)
committer
kim
<kim@3cdefd35-fc62-479d-8e8d-bae585ffb9ca>
Mon, 7 Feb 2011 13:23:24 +0000
(13:23 +0000)
git-svn-id: svn+ssh://idea.nguyen.vg/svn/sxsi/trunk/xpathcomp@947
3cdefd35
-fc62-479d-8e8d-
bae585ffb9ca
OCamlDriver.cpp
patch
|
blob
|
history
diff --git
a/OCamlDriver.cpp
b/OCamlDriver.cpp
index
b2c7627
..
3994970
100644
(file)
--- a/
OCamlDriver.cpp
+++ b/
OCamlDriver.cpp
@@
-791,15
+791,16
@@
int iterfcns(XMLTree* tree, treeNode node){
if (node == NULLT)
return 0;
else {
- int tmp = iterfcns(tree,tree->FirstElement(node));
+ int tmp = 1;
+ tmp += iterfcns(tree,tree->FirstElement(node));
tmp += iterfcns(tree,tree->NextElement(node));
- return tmp
+1
;
+ return tmp;
};
}
extern "C" value caml_benchmark_fcns(value tree){
int i = iterfcns(XMLTREE(tree),0);
- return Val_
unit
;
+ return Val_
int(i)
;
}