"Happy Squeaking Sample(2)"
"Copyright (C) 1999 OGIS-RI"


Object subclass: #TranscriptAction
	instanceVariableNames: ''
	classVariableNames: ''
	poolDictionaries: ''
	category: 'IfLess-Action'!

!TranscriptAction methodsFor: 'actions' stamp: 'MU 1/8/1999 11:19'!
fire
	self subclassResponsibility! !


TranscriptAction subclass: #ShowByeAction
	instanceVariableNames: ''
	classVariableNames: ''
	poolDictionaries: ''
	category: 'IfLess-Action'!

!ShowByeAction methodsFor: 'actions' stamp: 'MU 1/8/1999 11:34'!
fire
	Transcript cr; show: 'Bye'
! !


TranscriptAction subclass: #ShowHelloWorldAction
	instanceVariableNames: ''
	classVariableNames: ''
	poolDictionaries: ''
	category: 'IfLess-Action'!

!ShowHelloWorldAction methodsFor: 'actions' stamp: 'MU 1/8/1999 11:33'!
fire
	Transcript cr; show: 'HelloWorld'! !