Model subclass: #Item
instanceVariableNames: 'name price dispensingHolder '
classVariableNames: ''
poolDictionaries: ''
category: 'Vending'
!Item class methodsFor: 'instance creation'!
new
^super new initialize
!Item methodsFor: 'initialize-release'!
initialize
name := String new.
price := 0.0
Last modified at 7/15/97; 10:06:41 AM
Other Links of Interest
College of Computing | EduTech Institute | GVU Center
Mark Guzdial | Papers | CS 2390 Spring '97 Home Page | STABLE | MMC-CaMILE