'From Cuis 5.0 of 7 November 2016 [latest update: #3043] on 5 February 2017 at 4:39:43 pm'!
!classDefinition: #Minish category: #Freeze!
EllipseMorph subclass: #Minish
	instanceVariableNames: ''
	classVariableNames: ''
	poolDictionaries: ''
	category: 'Freeze'!
!Minish commentStamp: '<historical>' prior: 0!
Example which experiences a freeze.!


!Minish methodsFor: 'stepping' stamp: 'dhn 2/5/2017 16:38:33'!
mini

	self when: #morphicStep evaluate: [ :a |].
	self startSteppingStepTime: 8. 	
! !

"-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- "!

!classDefinition: 'Minish class' category: #Freeze!
Minish class
	instanceVariableNames: ''!

!Minish class methodsFor: 'instance creation' stamp: 'dhn 2/5/2017 16:37:16'!
start

	^ self new openInHand mini! !