open Virt_mem_utils
open Virt_mem_types
-let run debug ({ domname = domname }, _, utsname) =
+let run debug { domname = domname } { utsname = utsname } =
match utsname with
| Some u ->
printf "%s: %s %s %s %s %s %s\n"
architecture and node name for virtual machines running under
libvirt."
-let () = Virt_mem.register "uname" summary description ~run
+let () = Virt_mem.register "uname" summary description ~needs_utsname:true ~run