Browse files

Don't single-step sigspace.

It feels like it adds negative value to the debugging experience.
  • Loading branch information...
1 parent c1d805d commit 2a155b713b299ceb11817f7eed8644bd1022e86a @jnthn committed Oct 12, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 bin/perl6-debug.nqp
View
2 bin/perl6-debug.nqp
@@ -58,7 +58,7 @@ class Perl6::HookRegexActions is Perl6::RegexActions {
method quantified_atom($/) {
Perl6::RegexActions.quantified_atom($/);
my $qa := $/.ast;
- if $qa && $*DEBUG_HOOKS.has_hook('regex_atom') {
+ if $qa && !(~$/ ~~ /^\s*$/) && $*DEBUG_HOOKS.has_hook('regex_atom') {
$/.'!make'(QAST::Regex.new(
:rxtype('concat'),
QAST::Regex.new(

0 comments on commit 2a155b7

Please sign in to comment.