From d8ea64cdd08f4ee387ec72e3660c4091eeddf9d2 Mon Sep 17 00:00:00 2001
From: Rudi Grinberg <me@rgrinberg.com>
Date: Sun, 19 Jan 2025 21:21:20 +0000
Subject: [PATCH] fix: more compatability craziness

starts_with requires 4.13

Signed-off-by: Rudi Grinberg <me@rgrinberg.com>
---
 vendor/opam/src/format/opamPackage.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/vendor/opam/src/format/opamPackage.ml b/vendor/opam/src/format/opamPackage.ml
index 75b6f7dcfab..603294fe29f 100644
--- a/vendor/opam/src/format/opamPackage.ml
+++ b/vendor/opam/src/format/opamPackage.ml
@@ -70,8 +70,8 @@ module Version = struct
     match String.split_on_char '.' (List.nth parts 0) with
     | [] -> None
     | major :: rest ->
-        let style, major =
-          if String.starts_with major ~prefix:"v"
+         let style, major =
+           if String.length major > 0 && major.[0] = 'v'
            then V_triple, String.sub major 1 (String.length major - 1)
            else Triple, major
          in