Up  Next

Module Eliom_content_core.Xml

module Xml: sig .. end
module W: Xml_wrap.T 
    with type 'a t = 'a
     and type 'a tlist = 'a list
     and type (-'a, 'b) ft = 'a -> 'b
type uri = string 
val uri_of_string : uri -> string
val string_of_uri : string -> uri
val uri_of_fun : (unit -> string) -> uri
type aname = string 
type attrib 
type caml_event_handler =
| CE_registered_closure of string * Eliom_lib.poly
| CE_client_closure of (Js_of_ocaml.Dom_html.event Js_of_ocaml.Js.t -> unit)
| CE_client_closure_mouse of (Js_of_ocaml.Dom_html.mouseEvent Js_of_ocaml.Js.t -> unit)
| CE_client_closure_keyboard of (Js_of_ocaml.Dom_html.keyboardEvent Js_of_ocaml.Js.t -> unit)
| CE_client_closure_touch of (Js_of_ocaml.Dom_html.touchEvent Js_of_ocaml.Js.t -> unit)
| CE_call_service of ([ `A | `Form_get | `Form_post ] * (bool * string list) option *
string option * Ocsigen_lib_base.poly)
option Eliom_lazy.request		 
type internal_event_handler =
| Raw of string
| Caml of caml_event_handler 
type event_handler = Js_of_ocaml.Dom_html.event Js_of_ocaml.Js.t -> unit 
type mouse_event_handler = Js_of_ocaml.Dom_html.mouseEvent Js_of_ocaml.Js.t -> unit 
type keyboard_event_handler = Js_of_ocaml.Dom_html.keyboardEvent Js_of_ocaml.Js.t -> unit 
type touch_event_handler = Js_of_ocaml.Dom_html.touchEvent Js_of_ocaml.Js.t -> unit 
type ename = string 
type elt 
type 'a wrap = 'a 
type 'a list_wrap = 'a list 
type econtent = private
| Empty
| Comment of string
| EncodedPCDATA of string
| PCDATA of string
| Entity of string
| Leaf of ename * attrib list
| Node of ename * attrib list
* elt list