aboutsummaryrefslogtreecommitdiff
path: root/bin
diff options
context:
space:
mode:
authorMarc Coquand <marc@mccd.space>2024-05-10 15:04:43 -0500
committerMarc Coquand <marc@mccd.space>2024-05-10 15:04:43 -0500
commit4175da366830c0ef3bf40ddb1e6594ac5dbe3866 (patch)
tree14e84c6382fe063c1608485e2656dd245ff03198 /bin
downloadapbox-4175da366830c0ef3bf40ddb1e6594ac5dbe3866.tar.gz
apbox-4175da366830c0ef3bf40ddb1e6594ac5dbe3866.tar.bz2
apbox-4175da366830c0ef3bf40ddb1e6594ac5dbe3866.zip
Initial commit
Diffstat (limited to '')
-rw-r--r--bin/dune4
-rw-r--r--bin/main.ml6
2 files changed, 10 insertions, 0 deletions
diff --git a/bin/dune b/bin/dune
new file mode 100644
index 0000000..cf3fbf4
--- /dev/null
+++ b/bin/dune
@@ -0,0 +1,4 @@
+(executable
+ (public_name apbox)
+ (name main)
+ (libraries apbox cohttp-eio))
diff --git a/bin/main.ml b/bin/main.ml
new file mode 100644
index 0000000..44d41a2
--- /dev/null
+++ b/bin/main.ml
@@ -0,0 +1,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