File new fileIn: 'emp1.st' File new fileIn: 'database.st' db <- EmployeeDataBase new g1 <- Employee new g1 \ name: 'George Blogswell';\ empNum: 1021; \ salary: 2000; \ addSkill: 'Smalltalk'; \ addSkill: 'C++'; \ addSkill: 'Fortran' g2<-Employee new g2 \ name: 'Jane Lee'; \ empNum: 1054; \ salary: 2250; \ addSkill: 'Smalltalk'; \ addSkill: 'Lisp'; \ addSkill: 'C++' g3<-Employee new g3 \ name: 'Mike Mendez'; \ empNum: 1088; \ salary: 1950; \ addSkill: 'Cobol' db add: g1 db add: g2 db add: g3 db do: [:x | x name print] (db findSkill: 'Smalltalk') do: [:x | x name print]