+++ /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)