Skip to content
Open
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Original file line number Diff line number Diff line change
@@ -1,4 +1,37 @@
*neo-json-gemstone-core
decimalDigitLength
"Alias needed for Zinc"
^ self numberOfDigitsInBase: 10
"Answer the number of digits printed out in base 10.
Note that this only works for positive SmallIntegers up to 64-bits."
"1 decimalDigitLength >>> 1"
"100000000 decimalDigitLength >>> 9"
"SmallInteger maxVal decimalDigitLength >>> 19"

^self < 10000
ifTrue:
[self < 100
ifTrue:
[self < 10 ifTrue: [1] ifFalse: [2]]
ifFalse:
[self < 1000 ifTrue: [3] ifFalse: [4]]]
ifFalse:
[self < 100000000
ifTrue:
[self < 1000000
ifTrue: [self < 100000 ifTrue: [5] ifFalse: [6]]
ifFalse: [self < 10000000 ifTrue: [7] ifFalse: [8]]]
ifFalse:
[self < 1000000000000
ifTrue:
[self < 10000000000
ifTrue: [self < 1000000000 ifTrue: [9] ifFalse: [10]]
ifFalse: [self < 100000000000 ifTrue: [11] ifFalse: [12]]]
ifFalse:
[self < 10000000000000000
ifTrue:
[self < 100000000000000
ifTrue: [self < 10000000000000 ifTrue: [13] ifFalse: [14]]
ifFalse: [self < 1000000000000000 ifTrue: [15] ifFalse: [16]]]
ifFalse:
[self < 1000000000000000000
ifTrue: [self < 100000000000000000 ifTrue: [17] ifFalse: [18]]
ifFalse: [self < 10000000000000000000 ifTrue: [19] ifFalse: [20]]]]]]
Loading