From 90dbfe76603108f2b6fa44c6e16cc5e351be9571 Mon Sep 17 00:00:00 2001
From: gingerBill <bill@gingerbill.org>
Date: Wed, 27 Dec 2017 20:35:50 +0000
Subject: [PATCH] Fix issue #167 regarding abs, min, and, max for floats

---
 core/_preload.odin | 46 ++++++++++++++++++++++++++++++++++++++--------
 1 file changed, 38 insertions(+), 8 deletions(-)

diff --git a/core/_preload.odin b/core/_preload.odin
index 0374075d2..c73a8e630 100644
--- a/core/_preload.odin
+++ b/core/_preload.odin
@@ -792,15 +792,45 @@ foreign __llvm_core {
 
 	@(link_name="llvm.fmuladd.f32") fmuladd32  :: proc(a, b, c: f32) -> f32 ---;
 	@(link_name="llvm.fmuladd.f64") fmuladd64  :: proc(a, b, c: f64) -> f64 ---;
-
-	@(link_name="llvm.fabs.f32") __abs_f32 :: proc(x: f32) -> f32 ---;
-	@(link_name="llvm.fabs.f64") __abs_f64 :: proc(x: f64) -> f32 ---;
-
-	@(link_name="llvm.minnum.f32") __min_f32 :: proc(a, b: f32) -> f32 ---;
-	@(link_name="llvm.minnum.f64") __min_f64 :: proc(a, b: f64) -> f32 ---;
-	@(link_name="llvm.maxnum.f32") __max_f32 :: proc(a, b: f32) -> f32 ---;
-	@(link_name="llvm.maxnum.f64") __max_f64 :: proc(a, b: f64) -> f32 ---;
 }
+__abs_f32 :: inline proc "contextless" (x: f32) -> f32 {
+	foreign __llvm_core {
+		@(link_name="llvm.fabs.f32") _abs :: proc "c" (x: f32) -> f32 ---;
+	}
+	return _abs(x);
+}
+__abs_f64 :: inline proc "contextless" (x: f64) -> f64 {
+	foreign __llvm_core {
+		@(link_name="llvm.fabs.f64") _abs :: proc "c" (x: f64) -> f64 ---;
+	}
+	return _abs(x);
+}
+
+__min_f32 :: proc(a, b: f32) -> f32 {
+	foreign __llvm_core {
+		@(link_name="llvm.minnum.f32") _min :: proc "c" (a, b: f32) -> f32 ---;
+	}
+	return _min(a, b);
+}
+__min_f64 :: proc(a, b: f64) -> f64 {
+	foreign __llvm_core {
+		@(link_name="llvm.minnum.f64") _min :: proc "c" (a, b: f64) -> f64 ---;
+	}
+	return _min(a, b);
+}
+__max_f32 :: proc(a, b: f32) -> f32 {
+	foreign __llvm_core {
+		@(link_name="llvm.maxnum.f32") _max :: proc "c" (a, b: f32) -> f32 ---;
+	}
+	return _max(a, b);
+}
+__max_f64 :: proc(a, b: f64) -> f64 {
+	foreign __llvm_core {
+		@(link_name="llvm.maxnum.f64") _max :: proc "c" (a, b: f64) -> f64 ---;
+	}
+	return _max(a, b);
+}
+
 __abs_complex64 :: inline proc "contextless" (x: complex64) -> f32 {
 	r, i := real(x), imag(x);
 	return __sqrt_f32(r*r + i*i);