[View]  [Edit]  [Lock]  [References]  [Attachments]  [History]  [Home]  [Changes]  [Search]  [Help] 

test[s8] isNil overwride



"Implement Point>>#isNil and test isNil overwrite"
! Point methodsFor: #testing !
isNil
	" Responds true if the receiver is partially undefined. "

	^x isNil or: [ y isNil ]! !

[	Point new isNil ifFalse: [
		self error: '#isNil overwrite failed'
	]
] ensure: [ Point removeSelector: #isNil ].