Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

18 lines (13 sloc) 0.404 kb
(* Copyright (C) 2009 Mauricio Fernandez <mfp@acm.org> *)
open Eliom_parameters
open Lwt
let service = lazy begin
Eliom_predefmod.Text.register_new_service
~path:[""]
~get_params:unit
(fun sp () () -> return ("Hello, world\n", "text/plain"))
end
let () =
Eliom_services.register_eliom_module "hello"
(fun () -> ignore (Lazy.force service))
let () = Ocsigen_server.start_server ()
Jump to Line
Something went wrong with that request. Please try again.