sub value_for {
my ($self, $name) = @_;
- $self->_state->scope_var($name)->bound_value;
+ my $state = $self->_state;
+ $state->resolve_value($state->scope_var($name));
+}
+
+sub all_values {
+ my ($self) = @_;
+ return +{ map +($_ => $self->value_for($_)), $self->var_names };
}
1;