*** empty log message ***
authorStefan Vogel <sv@exept.de>
Thu, 18 Jul 2002 15:40:23 +0200
changeset 6650 35de1d8400b2
parent 6649 40637273cdc9
child 6651 4bc133e27717
*** empty log message ***
FixedPoint.st
Fraction.st
--- a/FixedPoint.st	Thu Jul 18 15:22:36 2002 +0200
+++ b/FixedPoint.st	Thu Jul 18 15:40:23 2002 +0200
@@ -953,7 +953,7 @@
     "Modified: 12.4.1997 / 11:22:02 / cg"
 ! !
 
-!FixedPoint methodsFor:'queries'!
+!FixedPoint methodsFor:'testing'!
 
 isFixedPoint
     "return true, if the receiver is some kind of fixedPoint number;
@@ -967,5 +967,5 @@
 !FixedPoint class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/FixedPoint.st,v 1.18 2002-07-17 10:52:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/FixedPoint.st,v 1.19 2002-07-18 13:40:23 stefan Exp $'
 ! !
--- a/Fraction.st	Thu Jul 18 15:22:36 2002 +0200
+++ b/Fraction.st	Thu Jul 18 15:40:23 2002 +0200
@@ -751,16 +751,14 @@
     denominator := den
 ! !
 
-!Fraction methodsFor:'queries'!
+!Fraction methodsFor:'testing'!
 
 isFraction
     "return true, if the receiver is some kind of fraction;
      true is returned here - the method is redefined from Object."
 
     ^ true
-! !
-
-!Fraction methodsFor:'testing'!
+!
 
 isLiteral
     "return true, if the receiver can be used as a literal constant in ST syntax
@@ -863,6 +861,6 @@
 !Fraction class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Fraction.st,v 1.57 2002-07-17 10:56:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Fraction.st,v 1.58 2002-07-18 13:39:47 stefan Exp $'
 ! !
 Fraction initialize!