module Server: sig
.. end
OCaml server done to facilitate the manipulation of lists of
students. Based on the project.ml files, it continues the "carried
away" principle by handling all UI issues with the help of a small
HTTP server based on OCamlNet.
val usage : string
val spec_list : (string * Arg.spec * string) list
val parse_args : unit -> unit
val encode_html : string -> string
val initialize_html : (string -> unit) -> string -> unit
val finalize_html : (string -> unit) -> unit
val display_args_html : (string -> unit) ->
< arguments : (string * < value : string; .. >) list; .. > -> unit
val display_values_html : (string -> unit) -> unit
val load_student_form : (string -> unit) -> unit
val reload_student_form : (string -> unit) -> unit
val save_student_form : (string -> unit) -> unit
val actions_form : (string -> unit) -> unit
val input_file_into_hpr : (string -> unit) -> string -> unit
val silent_tex_to_ps : string -> string -> unit
val list_student : 'a -> Netcgi1_compat.Netcgi_types.cgi_activation -> unit
val show_project : 'a -> Netcgi1_compat.Netcgi_types.cgi_activation -> unit
val show_team : 'a -> Netcgi1_compat.Netcgi_types.cgi_activation -> unit
val show_student : 'a -> Netcgi1_compat.Netcgi_types.cgi_activation -> unit
val show_gradelist : 'a -> Netcgi1_compat.Netcgi_types.cgi_activation -> unit
val show_orals : 'a -> Netcgi1_compat.Netcgi_types.cgi_activation -> unit
val listdir : string -> string list
val root_page : 'a -> Netcgi1_compat.Netcgi_types.cgi_activation -> unit
val fs_spec : Nethttpd_services.file_service
val srv : [> `Host_distributor of
[> `Uri_distributor of
[> `Dynamic_service of
Netcgi1_compat.Netcgi_types.cgi_activation
Nethttpd_services.dynamic_service
| `File_service of Nethttpd_services.file_service
| `Options_service ]
Nethttpd_services.uri_distributor ]
Nethttpd_services.host_distributor ]
Nethttpd_types.http_service
val main : unit