[scpubgit/DKit.git] / lib / DX / RefSet.pm

package DX::RefSet;

use DX::FactRef;
use DX::ArrayStream;
use Moo;

has target => (is => 'ro', required => 1);

has names => (is => 'ro', required => 1);

sub to_stream {
  my ($self) = @_;
  return DX::ArrayStream->from_array(
    map DX::FactRef->new(fact_type => $self->target, fact_id => $_),
      @{$self->names}
  );
}

1;
Commit	Line	Data
9c7b21a2	1	package DX::RefSet;
	2
	3	use DX::FactRef;
	4	use DX::ArrayStream;
	5	use Moo;
	6
	7	has target => (is => 'ro', required => 1);
	8
	9	has names => (is => 'ro', required => 1);
	10
	11	sub to_stream {
	12	my ($self) = @_;
	13	return DX::ArrayStream->from_array(
	14	map DX::FactRef->new(fact_type => $self->target, fact_id => $_),
	15	@{$self->names}
	16	);
	17	}
	18
	19	1;