sig
val menu :
?classe:XHTML.M.nmtoken list ->
((unit, unit,
[< `External_Service
| `Internal_Service of [< `Local_Service | `Public_Service ] ],
[< `WithSuffix | `WithoutSuffix ] as 'a, unit Ocsigen.param_name,
unit Ocsigen.param_name)
Ocsigen.service * Xhtmltypes.a_content XHTML.M.elt list)
list ->
(unit, unit,
[< `External_Service
| `Internal_Service of [< `Local_Service | `Public_Service ] ],
'a, unit Ocsigen.param_name, unit Ocsigen.param_name)
Ocsigen.service -> Ocsigen.server_params -> [> `Ul ] XHTML.M.elt
end