From 4b6f82222ada97e0fb3a3c0d62dc09819965be34 Mon Sep 17 00:00:00 2001 From: Offray Luna Date: Mon, 2 May 2022 22:39:26 -0500 Subject: [PATCH] Implementing printing. --- Apps/Holonica/HlPerson.class.st | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/Apps/Holonica/HlPerson.class.st b/Apps/Holonica/HlPerson.class.st index 716a2db..a5011db 100644 --- a/Apps/Holonica/HlPerson.class.st +++ b/Apps/Holonica/HlPerson.class.st @@ -70,3 +70,9 @@ HlPerson >> givenName: anObject [ givenName := anObject ] + +{ #category : #accessing } +HlPerson >> printOn: aStream [ + super printOn: aStream. + aStream nextPutAll: '( ', self givenName, ' ', self familyName, ' )' +]