]> xenbits.xensource.com Git - people/aperard/xen-unstable.git/commitdiff
tools/oxenstored: Re-format
authorAndrew Cooper <andrew.cooper3@citrix.com>
Mon, 26 Feb 2024 10:47:29 +0000 (10:47 +0000)
committerAndrew Cooper <andrew.cooper3@citrix.com>
Wed, 27 Mar 2024 16:00:47 +0000 (16:00 +0000)
Rerun make format.

Fixes: b6cf604207fd ("tools/oxenstored: Use Map instead of Hashtbl for quotas")
Signed-off-by: Andrew Cooper <andrew.cooper3@citrix.com>
Reviewed-by: Edwin Török <edwin.torok@cloud.com>
tools/ocaml/xenstored/quota.ml

index 1f652040d8986b35116f65c1b892041598c1dba1..082cd25f26fc2e2c013cd144bebd9d603b8c0222 100644 (file)
@@ -55,13 +55,13 @@ let _check quota id size =
     raise Data_too_big
   );
   if id > 0 then
-  try
-    let entry = DomidMap.find id quota.cur in
-    if entry >= quota.maxent then (
-      warn "domain %u cannot create entry: quota reached" id;
-      raise Limit_reached
-    )
-  with Not_found -> ()
+    try
+      let entry = DomidMap.find id quota.cur in
+      if entry >= quota.maxent then (
+        warn "domain %u cannot create entry: quota reached" id;
+        raise Limit_reached
+      )
+    with Not_found -> ()
 
 let check quota id size =
   if !activate then
@@ -88,4 +88,4 @@ let merge orig_quota mod_quota dest_quota =
     | diff -> update_entry dest id diff (* update with [x=x+diff] *)
   in
   {dest_quota with cur = DomidMap.fold fold_merge mod_quota.cur dest_quota.cur}
-  (* dest_quota = dest_quota + (mod_quota - orig_quota) *)
+(* dest_quota = dest_quota + (mod_quota - orig_quota) *)