15 lines
287 B
Smalltalk
15 lines
287 B
Smalltalk
|
Class {
|
||
|
#name : #EcSunburstTest,
|
||
|
#superclass : #TestCase,
|
||
|
#category : #'EchartsPharo-EchartsPharo'
|
||
|
}
|
||
|
|
||
|
{ #category : #accessing }
|
||
|
EcSunburstTest >> testSegmentsIsCollection [
|
||
|
|
||
|
| sunburst |
|
||
|
sunburst := EcSunburst new.
|
||
|
self assert: sunburst segments equals: OrderedCollection new
|
||
|
|
||
|
]
|