--- a/Integer.st Thu Jan 23 17:11:41 2014 +0100
+++ b/Integer.st Thu Jan 23 17:11:45 2014 +0100
@@ -1384,6 +1384,7 @@
"
! !
+
!Integer methodsFor:'bcd conversion'!
decodeFromBCD
@@ -4998,11 +4999,8 @@
|m|
m := self new modulus:123456789901398721398721931729371293712943794254034548369328469438562948623498659238469234659823469823658423659823658.
- Time millisecondsToRun:[
- 100000 timesRepeat:[
- m modulusOf:874928459437598375937451931729371293712943794254034548369328469438562948623498659238469234659823469823658423659823658.
- ]
- ]
+ m modulusOf:874928459437598375937451931729371293712943794254034548369328469438562948623498659238469234659823469823658423659823658.
+10730930127807326146398409623772237722337234475792709784029183368622308259008044569184592041059181058049458041058052 ]
"
"Modified: / 3.5.1999 / 14:30:32 / stefan"
@@ -5020,11 +5018,11 @@
!Integer class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Integer.st,v 1.288 2013-12-02 20:00:24 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Integer.st,v 1.289 2014-01-23 16:11:45 stefan Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/Integer.st,v 1.288 2013-12-02 20:00:24 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Integer.st,v 1.289 2014-01-23 16:11:45 stefan Exp $'
! !