Float.st
changeset 25069 f82e303cd35d
parent 25059 f3093a33e1e1
--- a/Float.st	Thu Dec 05 15:02:47 2019 +0100
+++ b/Float.st	Thu Dec 05 15:11:46 2019 +0100
@@ -1153,6 +1153,13 @@
 	    result = __floatVal(self) * (double)(__shortFloatVal(aNumber));
 	    goto retResult;
 	}
+	if (__qIsLongFloat(aNumber)) {
+	    LONGFLOAT_t lResult;
+
+	    lResult = ((LONGFLOAT_t)__floatVal(self)) * __longFloatVal(aNumber);
+	    __qMKLFLOAT(newFloat, lResult);
+	    RETURN ( newFloat );
+	}
     }
 #endif
 %}.
@@ -1198,6 +1205,13 @@
 	    result = __floatVal(self) + (double)(__shortFloatVal(aNumber));
 	    goto retResult;
 	}
+	if (__qIsLongFloat(aNumber)) {
+	    LONGFLOAT_t lResult;
+
+	    lResult = ((LONGFLOAT_t)__floatVal(self)) + __longFloatVal(aNumber);
+	    __qMKLFLOAT(newFloat, lResult);
+	    RETURN ( newFloat );
+	}
     }
 #endif
 %}.
@@ -1244,6 +1258,13 @@
 	    result = __floatVal(self) - (double)(__shortFloatVal(aNumber));
 	    goto retResult;
 	}
+	if (__qIsLongFloat(aNumber)) {
+	    LONGFLOAT_t lResult;
+
+	    lResult = ((LONGFLOAT_t)__floatVal(self)) - __longFloatVal(aNumber);
+	    __qMKLFLOAT(newFloat, lResult);
+	    RETURN ( newFloat );
+	}
     }
 #endif
 %}.
@@ -1651,6 +1672,9 @@
 	if (__qIsShortFloat(aNumber)) {
 	    RETURN ( (__floatVal(self) < (double)(__shortFloatVal(aNumber))) ? true : false );
 	}
+	if (__qIsLongFloat(aNumber)) {
+	    RETURN ( ((LONGFLOAT_t)(__floatVal(self)) < __longFloatVal(aNumber)) ? true : false );
+	}
     }
 #endif
 %}.
@@ -1685,6 +1709,9 @@
 	if (__qIsShortFloat(aNumber)) {
 	    RETURN ( (__floatVal(self) <= (double)(__shortFloatVal(aNumber))) ? true : false );
 	}
+	if (__qIsLongFloat(aNumber)) {
+	    RETURN ( ((LONGFLOAT_t)(__floatVal(self)) <= __longFloatVal(aNumber)) ? true : false );
+	}
     }
 #endif
 %}.
@@ -1721,6 +1748,9 @@
 	if (__qIsShortFloat(aNumber)) {
 	    RETURN ( (__floatVal(self) == (double)(__shortFloatVal(aNumber))) ? true : false );
 	}
+	if (__qIsLongFloat(aNumber)) {
+	    RETURN ( ((LONGFLOAT_t)(__floatVal(self)) == __longFloatVal(aNumber)) ? true : false );
+	}
     } else {
 	RETURN (false);
     }
@@ -1757,6 +1787,9 @@
 	if (__qIsShortFloat(aNumber)) {
 	    RETURN ( (__floatVal(self) > (double)(__shortFloatVal(aNumber))) ? true : false );
 	}
+	if (__qIsLongFloat(aNumber)) {
+	    RETURN ( ((LONGFLOAT_t)(__floatVal(self)) > __longFloatVal(aNumber)) ? true : false );
+	}
     }
 #endif
 %}.
@@ -1791,6 +1824,9 @@
 	if (__qIsShortFloat(aNumber)) {
 	    RETURN ( (__floatVal(self) >= (double)(__shortFloatVal(aNumber))) ? true : false );
 	}
+	if (__qIsLongFloat(aNumber)) {
+	    RETURN ( ((LONGFLOAT_t)(__floatVal(self)) >= __longFloatVal(aNumber)) ? true : false );
+	}
     }
 #endif
 %}.