X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2Ftree.ml;h=e06a11e5ff8d6c1a855e82d7f3eb262988515cec;hp=9ef78ce6b25e7c74b3e0a708c689ffda3997b68a;hb=5b5dcd45cf86701ccfe917c1d6ad73b83bb523c3;hpb=f71defc62c481fe8a3a161d904790f3ca117a8cb diff --git a/src/tree.ml b/src/tree.ml index 9ef78ce..e06a11e 100644 --- a/src/tree.ml +++ b/src/tree.ml @@ -14,7 +14,7 @@ (***********************************************************************) (* - Time-stamp: + Time-stamp: *) (** The different kind of XML nodes and utility functions *) @@ -41,9 +41,10 @@ module NodeKind = k1 == Node || k2 == Node || k1 == k2 end - (** Signatures for trees *) +exception Parse_error of string + module type S = sig type node