aboutsummaryrefslogtreecommitdiff
path: root/bin/main.ml
blob: 44d41a213310f9320d8461fbeac607674a2afb20 (plain)
1
2
3
4
5
6
open Cohttp_eio

let () =
  Eio_main.run @@ fun env ->
  let res = Client.get env ~host:"www.example.org" "/" in
  print_string @@ Client.read_fixed res