gistfile1.txt

diff --git a/src/QRegex/P6Regex/Actions.nqp b/src/QRegex/P6Regex/Actions.nqp
index 5fe283a..90597c2 100755
--- a/src/QRegex/P6Regex/Actions.nqp
+++ b/src/QRegex/P6Regex/Actions.nqp
@@ -432,7 +432,7 @@ class QRegex::P6Regex::Actions is HLL::Actions {
         while $i < $n {
             my $ast := $clist[$i].ast;
             if $ast.negate {
-                $ast.subtype('zerowidth');
+                $ast := QAST::Regex.new( :rxtype<conj>, :subtype<zerowidth>, $ast );
                 $qast := QAST::Regex.new( $ast, $qast, :rxtype<concat>, :node($/));
             }
             else {