~bduggan/raku-dawa

140eab47145eb57ee772948892f786e518b9d567 — Brian Duggan 3 months ago 49a38fc master
Fix defer to next thread
2 files changed, 2 insertions(+), 2 deletions(-)

M lib/Dawa.rakumod
M lib/Dawa/Debugger/Commands.rakumod
M lib/Dawa.rakumod => lib/Dawa.rakumod +1 -1
@@ 72,7 72,7 @@ sub maybe-stop($context) is hidden-from-backtrace {
      }
      CATCH {
          when Dawa::Exception {
            given .defer-to -> $n {
            with .defer-to -> $n {
              $deferred-to = $n;
              when $n == $*THREAD.id {
                $start-repl = True unless .should-continue;

M lib/Dawa/Debugger/Commands.rakumod => lib/Dawa/Debugger/Commands.rakumod +1 -1
@@ 16,7 16,7 @@ my sub cmd(*%kv) { %commands.push: %kv }
method run-command($cmd, $line, :$context, :$stack, :%tracking) {
  my $actual = %aliases{ $cmd } // $cmd;
  if %commands{ $actual } {
    self."$actual"($line.subst(/^^ $cmd \s+/,''), :$context, :$stack,:%tracking);
    self."$actual"($line.subst(/^^ $cmd\s*/,''), :$context, :$stack,:%tracking);
  } else {
    self.eval($line,:$context,:$stack,:%tracking);
  }