simon/tiny_httpd
1
0
Fork 0
mirror of https://github.com/c-cube/tiny_httpd.git synced 2025-12-07 11:45:36 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

CI and compat with 4.8

Browse source
This commit is contained in:
Simon Cruanes 2024-01-20 00:59:26 -05:00
parent c8852b15ab
commit 8c1c38f772
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
4 changed files with 6 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
.github/workflows/main.yml vendored
View file

@ -17,8 +17,9 @@ jobs:
#- macos-latest #- macos-latest
#- windows-latest #- windows-latest
ocaml-compiler: ocaml-compiler:
- 4.05 - 4.08.x
- 4.14 - 4.14.x
- 5.1.x
runs-on: ${{ matrix.os }} runs-on: ${{ matrix.os }}

2
dune-project
View file

@ -19,7 +19,7 @@
seq seq
base-threads base-threads
result result
(ocaml (>= 4.05)) (ocaml (>= 4.08))
(odoc :with-doc) (odoc :with-doc)
(conf-libcurl :with-test) (conf-libcurl :with-test)
(ptime :with-test) (ptime :with-test)

2
src/prometheus/tiny_httpd_prometheus.ml
View file

@ -102,7 +102,7 @@ module Histogram = struct
let create reg ?(tags = []) ?descr ~buckets name : t = let create reg ?(tags = []) ?descr ~buckets name : t =
opt_iter_ (validate_descr_ "histogram") descr; opt_iter_ (validate_descr_ "histogram") descr;
let buckets = let buckets =
List.sort Float.compare buckets List.sort Stdlib.compare buckets
|> List.map (fun thresh -> thresh, A.make 0) |> List.map (fun thresh -> thresh, A.make 0)
in in
let buckets = Array.of_list @@ buckets @ [ infinity, A.make 0 ] in let buckets = Array.of_list @@ buckets @ [ infinity, A.make 0 ] in

2
tiny_httpd.opam
View file

@ -15,7 +15,7 @@ depends: [
"seq" "seq"
"base-threads" "base-threads"
"result" "result"
"ocaml" {>= "4.05"} "ocaml" {>= "4.08"}
"odoc" {with-doc} "odoc" {with-doc}
"conf-libcurl" {with-test} "conf-libcurl" {with-test}
"ptime" {with-test} "ptime" {with-test}