[scpubgit/DKit.git] / lib / DX / Op / Materialize.pm

package DX::Op::Materialize;

use Moo;

with 'DX::Role::Op';

sub run {
  my ($self, $state) = @_;
  foreach my $k (keys %{$state->scope}) {
    my $var = $state->scope_var($k);
    next unless $var->is_bound;
    $state->resolve_value($var);
  }
  $state->then($self->next);
}

1;
Commit	Line	Data
71217e42	1	package DX::Op::Materialize;
	2
	3	use Moo;
	4
	5	with 'DX::Role::Op';
	6
71217e42	7	sub run {
71217e42	8	my ($self, $state) = @_;
7d384eca	9	foreach my $k (keys %{$state->scope}) {
	10	my $var = $state->scope_var($k);
	11	next unless $var->is_bound;
	12	$state->resolve_value($var);
6e409579	13	}
71217e42	14	$state->then($self->next);
	15	}
	16
	17	1;