From 6b4a2eeaa2d8a0198a9199656ee5fbbb8dc9ab76 Mon Sep 17 00:00:00 2001
From: "Paul A. Patience" <paul@apatience.com>
Date: Sun, 3 Oct 2021 20:11:20 -0400
Subject: exceptions: fix leftover uw_throwfs with errno.

* ffi.c (mmap_wrap, mmap_op): Switch to uw_ethrowf.

* sysif.c (getresgid_wrap): Same.
---
 sysif.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'sysif.c')

diff --git a/sysif.c b/sysif.c
index 6f4ad727..13f5f2a6 100644
--- a/sysif.c
+++ b/sysif.c
@@ -1846,8 +1846,8 @@ static val getresgid_wrap(void)
 {
   gid_t r, e, s;
   if (getresgid(&r, &e, &s) != 0)
-    uw_throwf(system_error_s, lit("getresgid failed: ~d/~s"),
-              num(errno), errno_to_str(errno), nao);
+    uw_ethrowf(system_error_s, lit("getresgid failed: ~d/~s"),
+               num(errno), errno_to_str(errno), nao);
   return list(num(r), num(e), num(s), nao);
 }
 
-- 
cgit v1.2.3