projects
/
SXSI
/
xpathcomp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
More debugging:
[SXSI/xpathcomp.git]
/
src
/
tree.ml
diff --git
a/src/tree.ml
b/src/tree.ml
index
bc81cf4
..
166eeea
100644
(file)
--- a/
src/tree.ml
+++ b/
src/tree.ml
@@
-96,7
+96,6
@@
struct
close_tag b atname
let start_element_handler parser_ b t tag attr_list =
close_tag b atname
let start_element_handler parser_ b t tag attr_list =
- display_count parser_;
do_text b t;
open_tag b tag;
match attr_list with
do_text b t;
open_tag b tag;
match attr_list with
@@
-108,12
+107,10
@@
struct
let end_element_handler parser_ b t tag =
let end_element_handler parser_ b t tag =
- display_count parser_;
do_text b t;
close_tag b tag
let character_data_handler parser_ _ t text =
do_text b t;
close_tag b tag
let character_data_handler parser_ _ t text =
- display_count parser_;
Buffer.add_string t text
let create_parser () =
Buffer.add_string t text
let create_parser () =