--- 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!