$node->climb_up(sub {
  my ($node) = @_;

  if (should_continue($node)) {
    return 0;
  }
  else {
    return 1, 42;
  }
});