Vmm_core.Name: use 'vm:' instead of 'name' as literal string to print

This commit is contained in:
Hannes Mehnert 2019-01-20 20:31:40 +01:00
parent f64583c74c
commit d30e118c76
1 changed files with 1 additions and 1 deletions

View File

@ -111,7 +111,7 @@ module Name = struct
match drop_super ~super ~sub with None -> false | Some _ -> true
let pp ppf ids =
Fmt.(pf ppf "[name %a]" (list ~sep:(unit ".") string) ids)
Fmt.(pf ppf "[vm: %a]" (list ~sep:(unit ".") string) ids)
end
module Policy = struct