Eliom_commonSourceinclude module type of struct include Eliom_common_base endtype user_scope = [ | `Session_group of scope_hierarchy| `Session of scope_hierarchy| `Client_process of scope_hierarchy ]val level_of_user_scope :
[< `Client_process of scope_hierarchy & 'a
| `Session of scope_hierarchy & 'b
| `Session_group of scope_hierarchy & 'c ] ->
[> user_level ]val cookie_level_of_user_scope :
[< `Client_process of scope_hierarchy & 'a
| `Session of scope_hierarchy & 'b
| `Session_group of scope_hierarchy & 'c ] ->
[> cookie_level ]type full_state_name = Eliom_common_base.full_state_name = {user_scope : user_scope;secure : bool;site_dir_str : string;}type att_key_serv = Eliom_common_base.att_key_serv = | SAtt_no| SAtt_named of string| SAtt_anon of string| SAtt_csrf_safe of int * user_scope * bool option| SAtt_na_named of string| SAtt_na_anon of string| SAtt_na_csrf_safe of int * user_scope * bool optiontype na_key_serv = Eliom_common_base.na_key_serv = | SNa_no| SNa_void_keep| SNa_void_dontkeep| SNa_get_ of string| SNa_post_ of string| SNa_get' of string| SNa_post' of string| SNa_get_csrf_safe of int * user_scope * bool option| SNa_post_csrf_safe of int * user_scope * bool optiontype sess_info = Eliom_common_base.sess_info = {si_other_get_params : (string * string) list;si_all_get_params : (string * string) list;si_all_post_params : (string * string) list option;si_all_file_params : (string * Eliom_lib.file_info) list option;si_nonatt_info : na_key_req;si_state_info : att_key_req * att_key_req;si_previous_extension_error : int;si_na_get_params : (string * string) list Lazy.t;si_nl_get_params : (string * string) list Eliom_lib.String.Table.t;si_nl_post_params : (string * string) list Eliom_lib.String.Table.t;si_nl_file_params : (string * Eliom_lib.file_info) list
Eliom_lib.String.Table.t;si_persistent_nl_get_params : (string * string) list Eliom_lib.String.Table.t
Lazy.t;si_all_get_but_na_nl : (string * string) list Lazy.t;si_all_get_but_nl : (string * string) list;si_ignored_get_params : (string * string) list;si_ignored_post_params : (string * string) list;si_client_process_info : client_process_info option;si_expect_process_data : bool Lazy.t;}type eliom_js_page_data = Eliom_common_base.eliom_js_page_data = {ejs_global_data : (Eliom_runtime.global_data * Eliom_wrap.unwrapper) option;ejs_request_data : Eliom_runtime.request_data;ejs_event_handler_table : Ocsigen_lib_base.poly
Eliom_runtime.RawXML.ClosureMap.t;ejs_client_attrib_table : Ocsigen_lib_base.poly
Eliom_runtime.RawXML.ClosureMap.t;ejs_sess_info : sess_info;}val split_nl_prefix_param :
(string * 'a) list ->
(string * 'a) list Eliom_lib.String.Table.t * (string * 'a) listval split_prefix_param :
string ->
(string * 'a) list ->
(string * 'a) list * (string * 'a) listService called with wrong parameter names
type 'a dircontent = 'a Eliom_common_base.dircontent = | Vide| Table of 'a direlt ref Eliom_lib.String.Table.ttype page_table_key = Eliom_common_base.page_table_key = {key_state : att_key_serv * att_key_serv;key_meth : meth;}type ('params, 'result) service = ('params, 'result) Eliom_common_base.service =
{s_id : anon_params_type * anon_params_type;mutable s_max_use : int option;s_expire : (float * float ref) option;s_f : bool -> 'params -> 'result Lwt.t;}