A.Tabletype t = tableval add :
Eliom_common.page_table_key ->
'a ->
([> `Ptc of 'a ] as 'b) Raw_table.t ->
'b Raw_table.tval find : Eliom_common.page_table_key -> [< `Ptc of 'a ] Raw_table.t -> 'aval empty : unit -> 'a Raw_table.tval remove : Eliom_common.page_table_key -> 'a Raw_table.t -> 'a Raw_table.t