broken-test[S8ObjC] cast-number

"Test Number -> NSNumber casting works"
| pi |
pi := Number pi.
((ID value: pi) handle value: #doubleValue) = pi ifFalse: [
	self error: 'Wrong value'
]