try
debug_print (sprintf "Received request: %s" req#path);
(match req#path with
+ | "/help" -> Http_daemon.respond ~body:"HELM Search Engine" outchan
| "/execute" ->
let query_string = req#param "query" in
let lexbuf = Lexing.from_string query_string in