From f50e1116c308fe92ea1ff6b4c9957b8771d8e362 Mon Sep 17 00:00:00 2001 From: Stephane Glondu Date: Thu, 17 Aug 2023 14:27:20 +0200 Subject: [PATCH] Handle "unknown" ocaml system as Linux In Debian, on mipsel and mips64el, ocaml reports system as "unknown". Gbp-Pq: Name 0001-Handle-unknown-ocaml-system-as-Linux.patch --- clock/select/select.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/clock/select/select.ml b/clock/select/select.ml index aea3237..7318e0a 100644 --- a/clock/select/select.ml +++ b/clock/select/select.ml @@ -22,12 +22,12 @@ let () = | [|_; "--system"; system; "-o"; output|] -> let system = match system with - | "linux" | "elf" -> `Linux + | "linux" | "elf" | "unknown" -> `Linux | "win32" | "win64" | "mingw64" | "mingw" | "cygwin" -> `Windows | "freebsd" -> `FreeBSD | "macosx" -> `MacOSX | "beos" | "dragonfly" | "bsd" | "openbsd" | "netbsd" | "gnu" - | "solaris" | "unknown" -> + | "solaris" -> invalid_arg "Unsupported system: %s" system | v -> if String.sub system 0 5 = "linux" -- 2.30.2