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