Call to update-compat.py.

1 files changed, 5 insertions, 1 deletions

diff --git a/lib/flags.ml b/lib/flags.ml
index f09dc48f5d..7676665fe9 100644
--- a/lib/flags.ml
+++ b/lib/flags.ml
@@ -60,7 +60,7 @@ let we_are_parsing = ref false
 (* Current means no particular compatibility consideration.
    For correct comparisons, this constructor should remain the last one. *)
 
-type compat_version = V8_8 | V8_9 | Current
+type compat_version = V8_8 | V8_9 | V8_10 | Current
 
 let compat_version = ref Current
 
@@ -71,6 +71,9 @@ let version_compare v1 v2 = match v1, v2 with
   | V8_9, V8_9 -> 0
   | V8_9, _ -> -1
   | _, V8_9 -> 1
+  | V8_10, V8_10 -> 0
+  | V8_10, _ -> -1
+  | _, V8_10 -> 1
   | Current, Current -> 0
 
 let version_strictly_greater v = version_compare !compat_version v > 0
@@ -79,6 +82,7 @@ let version_less_or_equal v = not (version_strictly_greater v)
 let pr_version = function
   | V8_8 -> "8.8"
   | V8_9 -> "8.9"
+  | V8_10 -> "8.10"
   | Current -> "current"
 
 (* Translate *)