lib/DX/Role/Predicate.pm

   1 package DX::Role::Predicate;
   2
   3 use Object::Tap;
   4 use DX::Role;
   5
   6 sub resolution_step_for {
   7   my ($self, $prop, @args) = @_;
   8   $self->_resolution_space_for(@args)
   9        ->but(proposition => $prop)
  10        ->$_tap(sub { trace rspace => $_[0] })
  11        ->next_step;
  12 }
  13
  14 1;