--- /dev/null
+(******************************************************************************)
+(* SXSI : XPath evaluator *)
+(* Kim Nguyen (Kim.Nguyen@nicta.com.au) *)
+(* Copyright NICTA 2008 *)
+(* Distributed under the terms of the LGPL (see LICENCE) *)
+(******************************************************************************)
+open Camlp4.Sig
+
+exception Error of int*int*string
+type token =
+ TAG of string
+ | STRING of string
+ | INT of int
+ | KWD of string
+ | ATT of string
+ | EOI
+module Loc : Loc with type t = int * int
+module Token : Token with module Loc = Loc and type t = token
+module Error : Error
+
+val mk : unit -> (Loc.t -> char Stream.t -> (Token.t * Loc.t) Stream.t)