diff options
| author | Théo Zimmermann | 2018-02-20 13:55:46 +0100 |
|---|---|---|
| committer | Théo Zimmermann | 2018-03-02 23:45:51 +0100 |
| commit | a4817d25befc71b7dbf707637660431144985133 (patch) | |
| tree | fb0d98df0c5678e5a277ff07de82b43bc8a69b7f /lib/flags.ml | |
| parent | ff7be36add22cf3c6efd24a27ebdde818fc1dc06 (diff) | |
Remove VOld compatibility flag.
Diffstat (limited to 'lib/flags.ml')
| -rw-r--r-- | lib/flags.ml | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/lib/flags.ml b/lib/flags.ml index 5da1310206..ac8e4ce473 100644 --- a/lib/flags.ml +++ b/lib/flags.ml @@ -67,14 +67,11 @@ 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 = VOld | V8_5 | V8_6 | V8_7 | Current +type compat_version = V8_5 | V8_6 | V8_7 | Current let compat_version = ref Current let version_compare v1 v2 = match v1, v2 with - | VOld, VOld -> 0 - | VOld, _ -> -1 - | _, VOld -> 1 | V8_5, V8_5 -> 0 | V8_5, _ -> -1 | _, V8_5 -> 1 @@ -90,7 +87,6 @@ let version_strictly_greater v = version_compare !compat_version v > 0 let version_less_or_equal v = not (version_strictly_greater v) let pr_version = function - | VOld -> "old" | V8_5 -> "8.5" | V8_6 -> "8.6" | V8_7 -> "8.7" |