Cursor calls set_default_parent.

Raku · Apr 21, 2011 · 7e325a4 · 7e325a4
1 parent 4371629
commit 7e325a4
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/src/Regex/Cursor.pir b/src/Regex/Cursor.pir
@@ -179,6 +179,11 @@ grammars.
     how."add_attribute"(type_obj, attr)
     attr = NQPAttribute."new"("&!regex" :named("name"))
     how."add_attribute"(type_obj, attr)
+
+    # Set default parent.
+    .local pmc NQPMu
+    NQPMu = get_hll_global "NQPMu"
+    how."set_default_parent"(type_obj, NQPMu)
 
     # Compose meta-object.
     how."compose"(type_obj)