=begin pod :kind("Type") :subkind("class") :category("exception")

=TITLE role CX::Emit

=SUBTITLE Emit control exception

    role CX::Emit does X::Control { }

A L<control exception|/language/exceptions#Control_exceptions> to be used when
emit is used inside a C<Supply> block.

=head1 Methods

=head2 method message

Defined as:

    method message()

Returns "<emit control exception>"

=end pod
