Skip to content

Commit bd69ea7

Browse files
committed
flambda-backend: Fix names in signals.c
1 parent 08e1a55 commit bd69ea7

File tree

1 file changed

+3
-3
lines changed

1 file changed

+3
-3
lines changed

otherlibs/unix/signals.c

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -78,15 +78,15 @@ CAMLprim value caml_unix_sigprocmask(value vaction, value vset)
7878
caml_leave_blocking_section();
7979
/* Run any handlers for just-unmasked pending signals */
8080
caml_process_pending_actions();
81-
if (retcode != 0) unix_error(retcode, "sigprocmask", Nothing);
81+
if (retcode != 0) caml_unix_error(retcode, "sigprocmask", Nothing);
8282
return encode_sigset(&oldset);
8383
}
8484

8585
CAMLprim value caml_unix_sigpending(value unit)
8686
{
8787
sigset_t pending;
8888
int i;
89-
if (sigpending(&pending) == -1) uerror("sigpending", Nothing);
89+
if (sigpending(&pending) == -1) caml_uerror("sigpending", Nothing);
9090
for (i = 1; i < NSIG; i++)
9191
if(caml_pending_signals[i])
9292
sigaddset(&pending, i);
@@ -101,7 +101,7 @@ CAMLprim value caml_unix_sigsuspend(value vset)
101101
caml_enter_blocking_section();
102102
retcode = sigsuspend(&set);
103103
caml_leave_blocking_section();
104-
if (retcode == -1 && errno != EINTR) uerror("sigsuspend", Nothing);
104+
if (retcode == -1 && errno != EINTR) caml_uerror("sigsuspend", Nothing);
105105
return Val_unit;
106106
}
107107

0 commit comments

Comments
 (0)