[xen staging] tools/ocaml: Fix mixed tabs/spaces

[patchbot@xxxxxxx]

commit 8d5507beeb717f6f91c3970a03993b354ff4c40b
Author:     Petr Beneš <w1benny@xxxxxxxxx>
AuthorDate: Thu Aug 1 09:36:54 2024 +0200
Commit:     Jan Beulich <jbeulich@xxxxxxxx>
CommitDate: Thu Aug 1 09:36:54 2024 +0200

    tools/ocaml: Fix mixed tabs/spaces
    
    No functional change.
    
    Signed-off-by: Petr Beneš <w1benny@xxxxxxxxx>
    Acked-by: Christian Lindig <christian.lindig@xxxxxxxxx>
---
 tools/ocaml/libs/xc/xenctrl_stubs.c | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/tools/ocaml/libs/xc/xenctrl_stubs.c 
b/tools/ocaml/libs/xc/xenctrl_stubs.c
index c6da9bb091..e86c455802 100644
--- a/tools/ocaml/libs/xc/xenctrl_stubs.c
+++ b/tools/ocaml/libs/xc/xenctrl_stubs.c
@@ -138,12 +138,12 @@ static void 
domain_handle_of_uuid_string(xen_domain_handle_t h,
  * integers in the Ocaml ABI for more idiomatic handling.
  */
 static value c_bitmap_to_ocaml_list
-             /* ! */
-             /*
+            /* ! */
+            /*
              * All calls to this function must be in a form suitable
              * for xenctrl_abi_check.  The parsing there is ad-hoc.
              */
-             (unsigned int bitmap)
+                (unsigned int bitmap)
 {
        CAMLparam0();
        CAMLlocal2(list, tmp);
@@ -180,8 +180,8 @@ static value c_bitmap_to_ocaml_list
 }
 
 static unsigned int ocaml_list_to_c_bitmap(value l)
-             /* ! */
-             /*
+            /* ! */
+            /*
              * All calls to this function must be in a form suitable
              * for xenctrl_abi_check.  The parsing there is ad-hoc.
              */
@@ -259,7 +259,7 @@ CAMLprim value stub_xc_domain_create(value xch_val, value 
wanted_domid, value co
                /* Quick & dirty check for ABI changes. */
                BUILD_BUG_ON(sizeof(cfg) != 68);
 
-        /* Mnemonics for the named fields inside xen_x86_arch_domainconfig */
+               /* Mnemonics for the named fields inside 
xen_x86_arch_domainconfig */
 #define VAL_EMUL_FLAGS          Field(arch_domconfig, 0)
 #define VAL_MISC_FLAGS          Field(arch_domconfig, 1)
 
@@ -351,7 +351,7 @@ static value dom_op(value xch_val, value domid,
        caml_enter_blocking_section();
        result = fn(xch, c_domid);
        caml_leave_blocking_section();
-        if (result)
+       if (result)
                failwith_xc(xch);
        CAMLreturn(Val_unit);
 }
@@ -383,7 +383,7 @@ CAMLprim value stub_xc_domain_resume_fast(value xch_val, 
value domid)
        caml_enter_blocking_section();
        result = xc_domain_resume(xch, c_domid, 1);
        caml_leave_blocking_section();
-        if (result)
+       if (result)
                failwith_xc(xch);
        CAMLreturn(Val_unit);
 }
@@ -426,7 +426,7 @@ static value alloc_domaininfo(xc_domaininfo_t * info)
        Store_field(result, 13, Val_int(info->max_vcpu_id));
        Store_field(result, 14, caml_copy_int32(info->ssidref));
 
-        tmp = caml_alloc_small(16, 0);
+       tmp = caml_alloc_small(16, 0);
        for (i = 0; i < 16; i++) {
                Field(tmp, i) = Val_int(info->handle[i]);
        }
--
generated by git-patchbot for /home/xen/git/xen.git#staging