Class String

back
at: index ifAbsent: exceptionBlock

	(self includesKey: index)

	     ifTrue: [ ^ Char new: <21 self index>]

	     ifFalse: [ ^ exceptionBlock value ]