X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=tag.mli;h=bc3ee5559bd8fb0fff8eade4ddf9f01deed94057;hb=d550133ad7afdf65c5e284c2bcf67a5bdde6faa7;hp=c7a15cbd51f6466c4b4c7929343a9a7ad67faa5a;hpb=c10ce35cd399aff15a49f3b24a31b38cb2191da0;p=SXSI%2Fxpathcomp.git diff --git a/tag.mli b/tag.mli index c7a15cb..bc3ee55 100644 --- a/tag.mli +++ b/tag.mli @@ -1,17 +1,23 @@ -(******************************************************************************) -(* SXSI : XPath evaluator *) -(* Kim Nguyen (Kim.Nguyen@nicta.com.au) *) -(* Copyright NICTA 2008 *) -(* Distributed under the terms of the LGPL (see LICENCE) *) -(******************************************************************************) -type t -type pool +type t = int +type pool +val tag : string -> t +val document_node : t val attribute : t val pcdata : t -val tag : string -> t +val attribute_data : t + + val init : pool -> unit +val to_string : t -> string val compare : t -> t -> int val equal : t -> t -> bool +val nullt : t + +val dump : Format.formatter -> t -> unit +val check : t -> unit (* Check internal invariants *) + +(* Data structures *) +val hash : t -> int val print : Format.formatter -> t -> unit -val to_string : t -> string +