--- a/ShortFloat.st Sat Aug 31 16:11:36 2019 +0200
+++ b/ShortFloat.st Sat Aug 31 16:11:58 2019 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1996 by Claus Gittinger
All Rights Reserved
@@ -2007,8 +2005,7 @@
!ShortFloat methodsFor:'testing'!
isFinite
- "return true, if the receiver is a finite float
- i.e. not NaN and not infinite."
+ "return true, if the receiver is a finite float (not NaN and not +/-INF)"
%{ /* NOCONTEXT */
float fV = __shortFloatVal(self);
@@ -2023,16 +2020,16 @@
^ false
"
- 1.0 asShortFloat isFinite
- (0.0 asShortFloat uncheckedDivide: 0.0) isFinite
- (1.0 asShortFloat uncheckedDivide: 0.0) isFinite
+ 1.0 asShortFloat isFinite
+ (0.0 asShortFloat uncheckedDivide: 0.0) isFinite
+ (1.0 asShortFloat uncheckedDivide: 0.0) isFinite
"
!
isNaN
"return true, if the receiver is an invalid float (NaN - not a number).
These are not created by ST/X float operations (they raise an exception);
- however, inline C-code could produce them ..."
+ however, inline C-code could produce them."
%{ /* NOCONTEXT */
float sV = __shortFloatVal(self);