xsd_glue dune: Don't wrap library modules to maintain xen compatibility

Signed-off-by: Andrii Sultanov <[email protected]>
xapi-project · Oct 8, 2024 · 959cdfa · 959cdfa
1 parent 867de1e
commit 959cdfa
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 3 deletions.
diff --git a/oxenstored/domains.ml b/oxenstored/domains.ml
@@ -45,8 +45,8 @@ let () =
   load_plug filepath
 
 module Plugin =
-  ( val Xsdglue.Plugin_interface_v1.get_plugin_v1 ()
-      : Xsdglue.Plugin_interface_v1.Domain_getinfo_V1
+  ( val Plugin_interface_v1.get_plugin_v1 ()
+      : Plugin_interface_v1.Domain_getinfo_V1
     )
 
 let handle = Plugin.interface_open ()

diff --git a/xsd_glue/domain_getinfo_plugin_v1/domain_getinfo_v1.ml b/xsd_glue/domain_getinfo_plugin_v1/domain_getinfo_v1.ml
@@ -1,7 +1,7 @@
 (* SPDX-License-Identifier: LGPL-2.1-only WITH OCaml-LGPL-linking-exception *)
 (** Minimal interface on top of unstable Xenctrl for Oxenstored's usage *)
 
-module P = Xsdglue.Plugin_interface_v1
+module P = Plugin_interface_v1
 
 module M : P.Domain_getinfo_V1 = struct
   exception Error of string

diff --git a/xsd_glue/dune b/xsd_glue/dune
@@ -1,5 +1,6 @@
 (library
  (name xsdglue)
  (public_name oxenstored.xsdglue)
+ (wrapped false)
  )