use strict;
use warnings;
package Context::Singleton::Exception::Nondeducible;
our $VERSION = v1.0.5;
use Exception::Class ( __PACKAGE__ );
sub new {
my ($self, $rule) = @_;
$self->SUPER::new (error => "Cannot deduce: $rule");
}
1;
use strict;
use warnings;
package Context::Singleton::Exception::Nondeducible;
our $VERSION = v1.0.5;
use Exception::Class ( __PACKAGE__ );
sub new {
my ($self, $rule) = @_;
$self->SUPER::new (error => "Cannot deduce: $rule");
}
1;