Fix -Wreturn-type warning in xenctrlext_stubs.c (#6859)

lindig · web-flow · commit 46d16f16a89d · 2026-01-23T15:57:36.000Z
Using `CAMLnoreturn` does not seem to work; so returning `unit`.
diff --git a/ocaml/libs/xenctrl-ext/xenctrlext_stubs.c b/ocaml/libs/xenctrl-ext/xenctrlext_stubs.c
@@ -694,10 +694,10 @@ CAMLprim value stub_xenctrlext_domain_claim_pages(value xch_val, value domid_val
                 raise_unix_errno_msg(the_errno,
                         "Error when trying to claim memory pages");
         }
-        CAMLreturn(Val_unit);
 #else
         raise_unix_errno_msg(ENOSYS, "xc_domain_claim_pages_node");
 #endif
+        CAMLreturn(Val_unit);
 }
 
 #ifdef XEN_DOMCTL_NUMA_OP_GET_NODE_PAGES

Original file line number	Diff line number	Diff line change
`@@ -694,10 +694,10 @@ CAMLprim value stub_xenctrlext_domain_claim_pages(value xch_val, value domid_val`
`694`	`694`	`raise_unix_errno_msg(the_errno,`
`695`	`695`	`"Error when trying to claim memory pages");`
`696`	`696`	`}`
`697`		`- CAMLreturn(Val_unit);`
`698`	`697`	`#else`
`699`	`698`	`raise_unix_errno_msg(ENOSYS, "xc_domain_claim_pages_node");`
`700`	`699`	`#endif`
	`700`	`+ CAMLreturn(Val_unit);`
`701`	`701`	`}`
`702`	`702`
`703`	`703`	`#ifdef XEN_DOMCTL_NUMA_OP_GET_NODE_PAGES`