From 619f8baace42dbd352e8ef5f89ae526167628c2d Mon Sep 17 00:00:00 2001 From: Pau Ruiz Safont Date: Mon, 27 Jan 2025 10:54:18 +0000 Subject: [PATCH] topology: do not print-debug the host NUMA information It's already printed by xenopsd, and now that development has stabilised, unit-test can print this useful unformation. Signed-off-by: Pau Ruiz Safont --- ocaml/xenopsd/lib/topology.ml | 9 --------- 1 file changed, 9 deletions(-) diff --git a/ocaml/xenopsd/lib/topology.ml b/ocaml/xenopsd/lib/topology.ml index 4503001f18..70b9b69569 100644 --- a/ocaml/xenopsd/lib/topology.ml +++ b/ocaml/xenopsd/lib/topology.ml @@ -14,8 +14,6 @@ module D = Debug.Make (struct let name = "topology" end) -open D - module CPUSet = struct include Set.Make (struct type t = int @@ -204,12 +202,8 @@ module NUMA = struct |> seq_sort ~cmp:dist_cmp |> Seq.map (fun ((_, avg), nodes) -> (avg, Seq.map (fun n -> Node n) nodes)) - let pp_dump_distances = Fmt.(int |> Dump.array |> Dump.array) - let make ~distances ~cpu_to_node = let ( let* ) = Option.bind in - debug "Distances: %s" (Fmt.to_to_string pp_dump_distances distances) ; - debug "CPU2Node: %s" (Fmt.to_to_string Fmt.(Dump.array int) cpu_to_node) ; let node_cpus = Array.map (fun _ -> CPUSet.empty) distances in (* nothing can be scheduled on unreachable nodes, remove them from the @@ -222,9 +216,6 @@ module NUMA = struct ) cpu_to_node ; - debug "Cpus in node: %s" - Fmt.(to_to_string (Dump.array CPUSet.pp_dump) node_cpus) ; - let* () = if Array.for_all (fun cpus -> CPUSet.is_empty cpus) node_cpus then ( D.info