fmin/fmax
authorClaus Gittinger <cg@exept.de>
Thu, 28 Nov 2019 16:21:35 +0100
changeset 25003 18856dfc86e4
parent 25002 34d9021dd872
child 25004 5068a9198c22
fmin/fmax
ShortFloat.st
--- a/ShortFloat.st	Thu Nov 28 16:19:31 2019 +0100
+++ b/ShortFloat.st	Thu Nov 28 16:21:35 2019 +0100
@@ -34,6 +34,7 @@
 #define __USE_ISOC9X 1
 #define __USE_ISOC99 1
 #include <math.h>
+#include <float.h>
 
 #ifndef INT32
 # define INT32 int
@@ -538,6 +539,26 @@
     ^-126
 !
 
+fmin
+%{
+    RETURN(__MKFLOAT(FLT_MIN));
+%}.
+
+    "
+     ShortFloat fmin
+    "
+!
+
+fmax
+%{
+    RETURN(__MKFLOAT(FLT_MAX));
+%}.
+
+    "
+     ShortFloat fmax
+    "
+!
+
 infinity
     "return a shortFloat which represents positive infinity (for my instances)"