From bb69dade38e7c75fb55abf308d239072f2ee136d Mon Sep 17 00:00:00 2001
From: zapashcanon <leo@ndrs.fr>
Date: Fri, 13 Aug 2021 14:53:12 +0200
Subject: [PATCH] add a basic test

---
 test/basic_test.ml | 6 ++++++
 test/dune          | 3 +++
 2 files changed, 9 insertions(+)
 create mode 100644 test/basic_test.ml
 create mode 100644 test/dune

diff --git a/test/basic_test.ml b/test/basic_test.ml
new file mode 100644
index 0000000..d0f8867
--- /dev/null
+++ b/test/basic_test.ml
@@ -0,0 +1,6 @@
+let () =
+  match Ezcurl.get ~url:"https://archive.softwareheritage.org/api/1/content/sha1_git:7bdf38d4468c114206c9b6ebd9cf1176e085d346/" () with
+  | Error (code, msg) ->
+    Format.eprintf "curl error: code `%s` (%s)@." (Curl.strerror code) msg
+  | Ok _response ->
+    Format.printf "OK@."
diff --git a/test/dune b/test/dune
new file mode 100644
index 0000000..13eec6a
--- /dev/null
+++ b/test/dune
@@ -0,0 +1,3 @@
+(test
+  (name basic_test)
+  (libraries ezcurl))