Class { #name : 'ContactBookTest', #superclass : 'TestCase', #instVars : [ 'blog', 'post' ], #category : 'ContactBook', #package : 'ContactBook' } { #category : 'running' } ContactBookTest >> setUp [ blog := ContactBook new. blog addContact: (Contact newNamed: 'Tudor Girba' email: 'tudor@tudorgirba.com'). post := Contact newNamed: 'Clara Allende' email: 'clari.allende@gmail.com' ] { #category : 'tests' } ContactBookTest >> testAddContact [ blog addContact: post. self assert: blog size equals: 2 ] { #category : 'tests' } ContactBookTest >> testContacts [ blog addContact: post. self assert: blog contacts size equals: 2 ] { #category : 'tests' } ContactBookTest >> testRemoveContact [ blog removeContact: blog contacts first. self assert: blog size equals: 0 ] { #category : 'tests' } ContactBookTest >> testSize [ self assert: blog size equals: 1 ]