(***********************************************************************)
(*                                                                     *)
(*                                 GALAX                               *)
(*                            XML Query Engine                         *)
(*                                                                     *)
(*  Copyright 2000, Lucent Technologies.                               *)
(*  Distributed only by permission.                                    *)
(*                                                                     *)
(***********************************************************************)

(* $Id: whitespace.mli,v 1.2 2001/11/08 17:12:04 simeon Exp $ *)

(* Whitespace operations *)

val remove_whitespace : string -> string
val remove_whitespace_and_empty : string -> string option

(* Whitespace or not whitespace ? That is the question... *)

val white : char -> bool

