--- api/libuv/src/Clib/bgluv.c.orig 2023-12-22 09:18:46.000000000 -0700 +++ api/libuv/src/Clib/bgluv.c 2023-12-25 14:09:43.234920017 -0700 @@ -2978,7 +2978,7 @@ uv_listen_cb(uv_stream_t *handle, int st /* bgl_uv_listen ... */ /*---------------------------------------------------------------------*/ int -bgl_uv_listen(obj_t obj, int backlog, obj_t proc, bgl_uv_loop_t bloop) { +bgl_uv_listen(obj_t obj, int backlog, obj_t proc) { if (!(PROCEDUREP(proc) && (PROCEDURE_CORRECT_ARITYP(proc, 2)))) { C_SYSTEM_FAILURE(BGL_TYPE_ERROR, "uv-tcp-listen", "wrong callback", proc); --- runtime/Clib/csystem.c.orig 2023-12-22 09:18:46.000000000 -0700 +++ runtime/Clib/csystem.c 2023-12-25 11:46:58.136516120 -0700 @@ -837,17 +837,17 @@ bgl_getrlimit(long resource) { /* obj_t */ /* bgl_setrlimit ... */ /*---------------------------------------------------------------------*/ -obj_t +bool_t bgl_setrlimit(long resource, long soft, long hard) { #if BGL_HAVE_GETRLIMIT struct rlimit lim = { .rlim_cur = soft, .rlim_max = hard }; if (!setrlimit(resource, &lim)) { - return BTRUE; + return 1; } else { - return BFALSE; + return 0; } #else - return BFALSE; + return 0; #endif } --- runtime/Include/bigloo_pair.h.orig 2023-12-22 09:18:46.000000000 -0700 +++ runtime/Include/bigloo_pair.h 2023-12-25 11:44:51.923177225 -0700 @@ -60,7 +60,7 @@ struct bgl_epair { obj_t car; obj_t cdr; /* extended header type */ -#if( (BGL_GC == BGL_BOEHM_GC) && TAG_PAIR ) +#if( TAG_PAIR ) obj_t eheader; #endif /* extended slot */