simon/ezcurl
1
0
Fork 0
mirror of https://github.com/c-cube/ezcurl.git synced 2025-12-06 03:05:31 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

wip: tests

Browse source
This commit is contained in:
Simon Cruanes 2024-09-04 16:00:25 -04:00
parent e7a862d8c4
commit ec0871ef69
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
2 changed files with 14 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
test/picos/basic_test.ml Normal file
View file

@ -0,0 +1,11 @@
let () =
Picos_mux_fifo.run @@ fun () ->
match
Ezcurl_picos.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@."

3
test/picos/dune Normal file
View file

@ -0,0 +1,3 @@
(test
(name basic_test)
(libraries ezcurl_picos picos_mux.fifo))