Class Indexed

indexOf: element ifAbsent: exceptionBlock

	1 to: self size do: [:i | (element = (self at: i)) ifTrue: [ ^ i ]].

	^ exceptionBlock value