--- a/Integer.st Thu Mar 10 16:46:30 2016 +0100
+++ b/Integer.st Thu Mar 10 17:17:37 2016 +0100
@@ -14,17 +14,17 @@
"{ NameSpace: Smalltalk }"
Number subclass:#Integer
- instanceVariableNames:''
- classVariableNames:'BCDConversionErrorSignal PrimeCache'
- poolDictionaries:''
- category:'Magnitude-Numbers'
+ instanceVariableNames:''
+ classVariableNames:'BCDConversionErrorSignal PrimeCache'
+ poolDictionaries:''
+ category:'Magnitude-Numbers'
!
Object subclass:#ModuloNumber
- instanceVariableNames:'modulus reciprocal shift'
- classVariableNames:''
- poolDictionaries:''
- privateIn:Integer
+ instanceVariableNames:'modulus reciprocal shift'
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:Integer
!
!Integer class methodsFor:'documentation'!
@@ -108,8 +108,8 @@
unsigned INT val;
if ((unsigned)idx < __stringSize(aString)) {
- extern int atoi();
- extern long atol();
+ extern int atoi();
+ extern long atol();
val = atol(cp + idx);
if (val <= _MAX_INT) {
@@ -1448,6 +1448,7 @@
"
! !
+
!Integer methodsFor:'bcd conversion'!
decodeFromBCD
@@ -2383,6 +2384,7 @@
!
digitByteLength
+ <resource: #obsolete>
"return the number bytes required for a 2's complement
binary representation of this Integer."