Generate better stack trace on arithmetic overflow

[pchiusano]

foo = do Nat.shiftRight 1 maxNat
bar = do !foo
baz = do !bar
qux = do !baz
> !qux

This just produces:

  Now evaluating any watch expressions (lines starting with `>`)... Ctrl+C cancels.

Encountered exception:
arithmetic overflow

With no further information.