simon/ocaml-opentelemetry
1
0
Fork 0
mirror of https://github.com/ocaml-tracing/ocaml-opentelemetry.git synced 2026-03-08 03:47:59 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

dune fmt

Browse source
This commit is contained in:
Elliott Cable 2023-09-20 15:15:58 +00:00
parent 76c18c55c2
commit 9a834b39f7
6 changed files with 26 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
dune
View file

@ -1,3 +1,4 @@
(env
(_
(flags :standard -warn-error -a+8 -w +a-4-30-40-41-42-44-48-70 -strict-sequence)))
(flags :standard -warn-error -a+8 -w +a-4-30-40-41-42-44-48-70
-strict-sequence)))

3
src/client-cohttp-lwt/dune
View file

@ -2,6 +2,7 @@
(name opentelemetry_client_cohttp_lwt)
(public_name opentelemetry-client-cohttp-lwt)
(synopsis "Opentelemetry collector using cohttp+lwt+unix")
(preprocess (pps lwt_ppx))
(preprocess
(pps lwt_ppx))
(libraries opentelemetry lwt cohttp-lwt cohttp-lwt-unix pbrt mtime
mtime.clock.os))

3
src/dune
View file

@ -2,7 +2,8 @@
(name opentelemetry)
(synopsis "API for opentelemetry instrumentation")
(flags :standard -warn-error -a+8)
(libraries ambient-context ptime ptime.clock.os pbrt threads opentelemetry.atomic)
(libraries ambient-context ptime ptime.clock.os pbrt threads
opentelemetry.atomic)
(public_name opentelemetry))
; ### protobuf rules ###

16
src/opentelemetry.ml
View file

@ -682,7 +682,13 @@ module Span : sig
val id : t -> Span_id.t
type key_value =
string * [ `Int of int | `String of string | `Bool of bool | `Float of float | `None ]
string
* [ `Int of int
| `String of string
| `Bool of bool
| `Float of float
| `None
]
val create :
?kind:kind ->
@ -719,7 +725,13 @@ end = struct
| Span_kind_consumer
type key_value =
string * [ `Int of int | `String of string | `Bool of bool | `Float of float | `None ]
string
* [ `Int of int
| `String of string
| `Bool of bool
| `Float of float
| `None
]
type nonrec status_code = status_status_code =
| Status_code_unset

6
tests/bin/dune
View file

@ -6,8 +6,10 @@
(executable
(name emit1_cohttp)
(modules emit1_cohttp)
(preprocess (pps lwt_ppx))
(libraries unix opentelemetry opentelemetry-lwt opentelemetry-client-cohttp-lwt lwt.unix))
(preprocess
(pps lwt_ppx))
(libraries unix opentelemetry opentelemetry-lwt
opentelemetry-client-cohttp-lwt lwt.unix))
(executable
(name cohttp_client)

4
tests/dune
View file

@ -1,6 +1,4 @@
(tests
(names test_trace_context test_get_url)
(libraries
opentelemetry
opentelemetry-client-ocurl
(libraries opentelemetry opentelemetry-client-ocurl
opentelemetry-client-cohttp-lwt))