"Before:" println
writeln("3/2: ", 3/2)
writeln("3/0: ", 3/0)
writeln("3/-2: ", (3/(-2)))

Number coreDiv := Number getSlot("/")
Number / = method(n,
	return if (n == 0, 0, self coreDiv(n))
)

"\nAfter:" println
writeln("3/2: ", 3/2)
writeln("3/0: ", 3/0)
writeln("3/-2: ", (3/(-2)))