Enable step caching

This commit is contained in:
Alessandro Ranellucci 2014-06-10 16:12:14 +02:00
parent c5c069b9a0
commit 2d14ddb955

View file

@ -355,8 +355,7 @@ sub process {
if (!$self->_state->done($step)) { if (!$self->_state->done($step)) {
$self->_state->set_started($step); $self->_state->set_started($step);
$cb->(); $cb->();
### Re-enable this for step-based slicing: $self->_state->set_done($step);
### $self->_state->set_done($step);
} }
}; };
my $object_step = sub { my $object_step = sub {
@ -366,8 +365,7 @@ sub process {
if (!$object->_state->done($step)) { if (!$object->_state->done($step)) {
$object->_state->set_started($step); $object->_state->set_started($step);
$cb->($obj_idx); $cb->($obj_idx);
### Re-enable this for step-based slicing: $object->_state->set_done($step);
### $object->_state->set_done($step);
} }
} }
}; };