File Coverage

blib/lib/VS/RuleEngine/Engine/Outputs.pm

Criterion	Covered	Total	%
statement	25	26	96.1
branch	1	2	50.0
condition			n/a
subroutine	9	9	100.0
pod	3	3	100.0
total	38	40	95.0

use strict;
use warnings;

use Carp qw(croak);

use VS::RuleEngine::Engine::Common;
use VS::RuleEngine::TypeDecl;

sub add_output {
	my ($self, $name, $output, $defaults, @args) = @_;
    $self->_check_add_args('Output', \&has_output, $name, $output);
	$self->_outputs->set($name => VS::RuleEngine::TypeDecl->new($output, $defaults, @args));
}

sub outputs {
	my $self = shift;
	return $self->_outputs->keys;
}

sub has_output {
    my ($self, $name) = @_;
    return $self->_outputs->exists($name);
}

sub _get_output {
	my ($self, $name) = @_;

	if ($self->has_output($name)) {
		return $self->_outputs->get($name);
	}

	croak "Can't find output '$name'";
}

1;
__END__