Class SmallInt

rem: arg

	(0 = arg) ifTrue: [^ self error: 'division by zero'].

	^ arg remWithSmallInt: self