NumericEventHandler( ':-division_by_zero'
                     = proc() infinity; end proc ):

1/0;

NumericStatus(':-division_by_zero'); # We may check the status flag