File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -1852,16 +1852,13 @@ module VM = struct
18521852 " VM = %s; using memory_dynamic_min = %Ld and \
18531853 memory_dynamic_max = %Ld"
18541854 vm.Vm. id vm.memory_dynamic_min vm.memory_dynamic_max ;
1855- ( vm.memory_dynamic_min +++ overhead_bytes
1856- , vm.memory_dynamic_max +++ overhead_bytes
1857- , None
1858- )
1855+ (vm.memory_dynamic_min, vm.memory_dynamic_max, None )
18591856 )
18601857 in
1861- let min_kib = kib_of_bytes_used min_bytes
1858+ let min_kib = kib_of_bytes_used ( min_bytes +++ overhead_bytes)
18621859 and memory_total_source_kib =
18631860 Option. map kib_of_bytes_used memory_total_source_bytes
1864- and max_kib = kib_of_bytes_used max_bytes in
1861+ and max_kib = kib_of_bytes_used ( max_bytes +++ overhead_bytes) in
18651862 (* XXX: we would like to be able to cancel an in-progress
18661863 with_reservation *)
18671864 let dbg = Xenops_task. get_dbg task in
You can’t perform that action at this time.
0 commit comments