projects
/
tatoo.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
ajout d'un compteur pour compter le nombre de noeuds évalués
[tatoo.git]
/
src
/
tatoo.ml
diff --git
a/src/tatoo.ml
b/src/tatoo.ml
index
57d5f1a
..
9fb7045
100644
(file)
--- a/
src/tatoo.ml
+++ b/
src/tatoo.ml
@@
-53,7
+53,6
@@
let main () =
let d = time Naive_tree.load_xml_file fd "parsing xml document" in
close_fd (); d
in
- let () = Gc.compact () in
let queries =
time
(fun l ->