From a8c40885939a44631a63418e2d4f80896a2109f4 Mon Sep 17 00:00:00 2001
From: Andrew Kane <andrew@ankane.org>
Date: Sun, 5 Mar 2023 12:17:21 -0800
Subject: [PATCH] Added lgamma_r and lgammaf_r

---
 src/math.rs | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)

diff --git a/src/math.rs b/src/math.rs
index 982c9499..498e4d85 100644
--- a/src/math.rs
+++ b/src/math.rs
@@ -86,6 +86,31 @@ no_mangle! {
     fn tanf(n: f32) -> f32;
 }
 
+#[cfg(any(
+    all(
+        target_family = "wasm",
+        target_os = "unknown",
+        not(target_env = "wasi")
+    ),
+    target_os = "xous",
+    all(target_arch = "x86_64", target_os = "uefi"),
+    all(target_arch = "xtensa", target_os = "none"),
+    all(target_vendor = "fortanix", target_env = "sgx")
+))]
+intrinsics! {
+    pub extern "C" fn lgamma_r(x: f64, s: &mut i32) -> f64 {
+        let r = self::libm::lgamma_r(x);
+        *s = r.1;
+        r.0
+    }
+
+    pub extern "C" fn lgammaf_r(x: f32, s: &mut i32) -> f32 {
+        let r = self::libm::lgammaf_r(x);
+        *s = r.1;
+        r.0
+    }
+}
+
 #[cfg(any(
     target_os = "xous",
     target_os = "uefi",