Tweak constructor order of imported Ordering - same as Base

mbarbin · Aug 5, 2024 · 64143b0 · 64143b0
1 parent 30939dd
commit 64143b0
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 3 deletions.
diff --git a/src/import.ml b/src/import.ml
@@ -19,8 +19,8 @@ end
 
 module Ordering = struct
   type t =
-    | Equal
     | Less
+    | Equal
     | Greater
 
   let of_int i = if i < 0 then Less else if i = 0 then Equal else Greater

diff --git a/src/import.mli b/src/import.mli
@@ -14,8 +14,8 @@ end
 
 module Ordering : sig
   type t =
-    | Equal
     | Less
+    | Equal
     | Greater
 
   val of_int : int -> t

diff --git a/src/provider.mli b/src/provider.mli
@@ -241,8 +241,8 @@ module Private : sig
 
     module Ordering : sig
       type t =
-        | Equal
         | Less
+        | Equal
         | Greater
 
       val of_int : int -> t