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

(* $Id: args.mli,v 1.3 2002/12/10 16:50:37 simeon Exp $ *)

(* Module Args
   Description:
     This module implements extraction of function arguments for
     various arities.
*)

(* Arguments extraction *)

val get_param0: 'a list -> unit
val get_param1: 'a list -> 'a
val get_param2: 'a list -> ('a * 'a)
val get_param3: 'a list -> ('a * 'a * 'a)

