From d6a27981fe615a977a7091abf96de7f51d83cb40 Mon Sep 17 00:00:00 2001
From: Rudi Grinberg <me@rgrinberg.com>
Date: Sun, 9 Oct 2022 13:10:19 -0600
Subject: [PATCH] chore: improve error message for fsevents failure

Include the problematic event flags in the error message

Signed-off-by: Rudi Grinberg <me@rgrinberg.com>

ps-id: 7ab84709-6af3-433e-b337-843610bd4119
---
 src/fsevents/fsevents_stubs.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fsevents/fsevents_stubs.c b/src/fsevents/fsevents_stubs.c
index c1c657972133..7baf9515e7ac 100644
--- a/src/fsevents/fsevents_stubs.c
+++ b/src/fsevents/fsevents_stubs.c
@@ -288,7 +288,7 @@ CAMLprim value dune_fsevents_action(value v_flags) {
   } else if (flags & kFSEventStreamEventFlagItemModified) {
     v_action = Val_int(3);
   } else {
-    caml_failwith("fsevents: unexpected event action");
+    caml_failwith(sprintf("fsevents: unexpected event action %d", Int32_val(v_flags)));
   }
 
   CAMLreturn(v_action);