From bd69ea7d7cd3fb17a00ed2630fcd43ef29ad1eb1 Mon Sep 17 00:00:00 2001 From: Mark Shinwell Date: Thu, 2 Nov 2023 11:38:45 +0000 Subject: [PATCH] flambda-backend: Fix names in signals.c --- otherlibs/unix/signals.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/otherlibs/unix/signals.c b/otherlibs/unix/signals.c index 2060959b9ae..cd6081142e4 100644 --- a/otherlibs/unix/signals.c +++ b/otherlibs/unix/signals.c @@ -78,7 +78,7 @@ CAMLprim value caml_unix_sigprocmask(value vaction, value vset) caml_leave_blocking_section(); /* Run any handlers for just-unmasked pending signals */ caml_process_pending_actions(); - if (retcode != 0) unix_error(retcode, "sigprocmask", Nothing); + if (retcode != 0) caml_unix_error(retcode, "sigprocmask", Nothing); return encode_sigset(&oldset); } @@ -86,7 +86,7 @@ CAMLprim value caml_unix_sigpending(value unit) { sigset_t pending; int i; - if (sigpending(&pending) == -1) uerror("sigpending", Nothing); + if (sigpending(&pending) == -1) caml_uerror("sigpending", Nothing); for (i = 1; i < NSIG; i++) if(caml_pending_signals[i]) sigaddset(&pending, i); @@ -101,7 +101,7 @@ CAMLprim value caml_unix_sigsuspend(value vset) caml_enter_blocking_section(); retcode = sigsuspend(&set); caml_leave_blocking_section(); - if (retcode == -1 && errno != EINTR) uerror("sigsuspend", Nothing); + if (retcode == -1 && errno != EINTR) caml_uerror("sigsuspend", Nothing); return Val_unit; }