6 lines
169 B
Text
6 lines
169 B
Text
NumericEventHandler( ':-division_by_zero'
|
|
= proc() infinity; end proc ):
|
|
|
|
1/0;
|
|
|
|
NumericStatus(':-division_by_zero'); # We may check the status flag
|