this is the last time I change dir before initializing i promise
reflect interface simplification on README
reorganizing files and improving interface
(* Gemini-Server: Simplest possible server example *) open Lwt.Syntax open Gemsrv let conf = { defconfig with workdir = "server"; keypath = "certs/cert.key"; crtpath = "certs/cert.crt"; } let main () = let* server = init conf in let rec loop () = let* session, _ = recv server in let* request = read session in let ans = handle request in let* res = write session ans in loop res in loop () let () = Lwt_main.run @@ main ()