refactor(pkg): inline [RoleEntry] (#11238)

Signed-off-by: Rudi Grinberg <[email protected]>
ocaml · Dec 24, 2024 · 0b84c87 · 0b84c87
1 parent 2017391
commit 0b84c87
Showing 1 changed file with 4 additions and 5 deletions.
diff --git a/src/0install-solver/solver_core.ml b/src/0install-solver/solver_core.ml
@@ -163,13 +163,12 @@ module Make (Model : S.SOLVER_INPUT) = struct
           vars
     end
 
-  module RoleEntry = struct
-    include Model.Role
+  module ImplCache = Cache (struct
+      include Model.Role
 
-    type value = impl_candidates
-  end
+      type value = impl_candidates
+    end)
 
-  module ImplCache = Cache (RoleEntry)
   module RoleMap = ImplCache.M
 
   type diagnostics = S.lit