LongFloat.st
changeset 5357 39860dd8b0f5
parent 5317 6004c4c2a916
child 5411 c396c6640868
equal deleted inserted replaced
5356:5c8883c4f065 5357:39860dd8b0f5
   905 
   905 
   906     RETURN ( (__longFloatVal(self) < 0.0) ? true : false );
   906     RETURN ( (__longFloatVal(self) < 0.0) ? true : false );
   907 %}
   907 %}
   908 !
   908 !
   909 
   909 
       
   910 numberOfBits
       
   911     "return the size (in bits) of the real;
       
   912      typically, 80 or 96 is returned here,
       
   913      but who knows ..."
       
   914 
       
   915 %{  /* NOCONTEXT */
       
   916 
       
   917     RETURN (__MKSMALLINT (sizeof(long double) * 8));
       
   918 %}
       
   919 
       
   920     "
       
   921      LongFloat basicNew numberOfBits  
       
   922     "
       
   923 !
       
   924 
   910 positive
   925 positive
   911     "return true if the receiver is greater or equal to zero"
   926     "return true if the receiver is greater or equal to zero"
   912 
   927 
   913 %{  /* NOCONTEXT */
   928 %{  /* NOCONTEXT */
   914 
   929 
   971 ! !
   986 ! !
   972 
   987 
   973 !LongFloat class methodsFor:'documentation'!
   988 !LongFloat class methodsFor:'documentation'!
   974 
   989 
   975 version
   990 version
   976     ^ '$Header: /cvs/stx/stx/libbasic/LongFloat.st,v 1.10 2000-03-22 13:34:24 cg Exp $'
   991     ^ '$Header: /cvs/stx/stx/libbasic/LongFloat.st,v 1.11 2000-04-04 10:21:22 ps Exp $'
   977 ! !
   992 ! !