--- a/Integer.st Mon Aug 02 12:33:35 2010 +0200
+++ b/Integer.st Mon Aug 02 12:34:20 2010 +0200
@@ -1139,7 +1139,6 @@
^ self == Integer
! !
-
!Integer methodsFor:'Compatibility-Dolphin'!
& aNumber
@@ -2403,6 +2402,15 @@
"Modified: / 24.2.1998 / 10:07:29 / stefan"
! !
+!Integer methodsFor:'dependents access'!
+
+addDependent:anObject
+ Transcript show:'*** trying to make dependent on an integer: '.
+ thisContext sender printOn:Transcript. Transcript cr.
+
+ "Created: / 28-07-2010 / 20:29:00 / cg"
+! !
+
!Integer methodsFor:'double dispatching'!
differenceFromFraction:aFraction
@@ -3921,7 +3929,6 @@
"Modified: 15.10.1997 / 18:43:49 / cg"
! !
-
!Integer methodsFor:'special access'!
exponent
@@ -4700,11 +4707,11 @@
!Integer class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Integer.st,v 1.247 2010-08-02 10:24:37 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Integer.st,v 1.248 2010-08-02 10:34:20 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/Integer.st,v 1.247 2010-08-02 10:24:37 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Integer.st,v 1.248 2010-08-02 10:34:20 cg Exp $'
! !
Integer initialize!