file: 01-C-event.t package: muf status: alpha
The muffleWarning function invokes the most
recent muffleWarning restart, which normally
results in continuation of the computation that was
just interrupted without printing of a warning message:
It is normally invoked by a handler for a event
signaled via ]warn, which establishes a
muffleWarning to let handlers suppress its
default message. See section ]warn.
The event argument will usually be nil,
but might potentially be used to restrict selection to
a subset of the active muffleWarning restarts.
The muffleWarning function is currently implemented as:
: muffleWarning { $ -> } -> event
'muffleWarning event findRestart -> restart
restart if restart invokeRestart fi
[ :event .err.controlError | ]signal
;
Go to the first, previous, next, last section, table of contents.