mirror of
https://github.com/ocaml-tracing/ocaml-opentelemetry.git
synced 2026-03-09 04:17:56 -04:00
fix tests after renaming Http_config
This commit is contained in:
parent
03c687b8b3
commit
b4c8803931
3 changed files with 3 additions and 3 deletions
|
|
@ -23,7 +23,7 @@ let run () =
|
||||||
let module C = (val mk_client ~scope) in
|
let module C = (val mk_client ~scope) in
|
||||||
(* Using the same default server O *)
|
(* Using the same default server O *)
|
||||||
let* _res, body =
|
let* _res, body =
|
||||||
C.get (Uri.of_string Opentelemetry_client.Client_config.default_url)
|
C.get (Uri.of_string Opentelemetry_client.Http_config.default_url)
|
||||||
in
|
in
|
||||||
let* () = Cohttp_lwt.Body.drain_body body in
|
let* () = Cohttp_lwt.Body.drain_body body in
|
||||||
go ()
|
go ()
|
||||||
|
|
|
||||||
|
|
@ -1,5 +1,5 @@
|
||||||
open Alcotest
|
open Alcotest
|
||||||
module Config = Opentelemetry_client.Client_config
|
module Config = Opentelemetry_client.Http_config
|
||||||
|
|
||||||
let test_config_printing () =
|
let test_config_printing () =
|
||||||
let module Env = Config.Env () in
|
let module Env = Config.Env () in
|
||||||
|
|
|
||||||
|
|
@ -111,7 +111,7 @@ module Tested_program = struct
|
||||||
end
|
end
|
||||||
|
|
||||||
let default_port =
|
let default_port =
|
||||||
String.split_on_char ':' Client.Client_config.default_url |> function
|
String.split_on_char ':' Client.Http_config.default_url |> function
|
||||||
(* Extracting the port from 'http://foo:<port>' *)
|
(* Extracting the port from 'http://foo:<port>' *)
|
||||||
| [ _; _; port ] -> int_of_string port
|
| [ _; _; port ] -> int_of_string port
|
||||||
| _ -> failwith "unexpected format in Client.Config.default_url"
|
| _ -> failwith "unexpected format in Client.Config.default_url"
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue