Try and clean up prefix:\ naming.

rakudo · Oct 27, 2009 · d1dbec7 · d1dbec7
1 parent d4f0367
commit d1dbec7
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/src/classes/Capture.pir b/src/classes/Capture.pir
@@ -60,7 +60,7 @@ Build a capture from its argument(s).
 =cut
 
 .namespace []
-.sub "prefix:\\"
+.sub 'prefix:\'
     .param pmc arg
     $I0 = isa arg, 'Perl6Scalar'
     if $I0 goto have_ref

diff --git a/src/classes/Object.pir b/src/classes/Object.pir
@@ -770,7 +770,7 @@ methods.
     push_eh check_error
     (pos_res :slurpy, named_res :named :slurpy) = cur_meth(self, pos_args :flat, named_args :named :flat)
     pop_eh
-    cap = 'prefix:\\'(pos_res :flat, named_res :flat :named)
+    cap = 'prefix:\'(pos_res :flat, named_res :flat :named)
     push result_list, cap
     goto it_loop
   is_multi:
@@ -780,7 +780,7 @@ methods.
     unless multi_it goto it_loop
     cur_meth = shift multi_it
     (pos_res :slurpy, named_res :named :slurpy) = cur_meth(self, pos_args :flat, named_args :named :flat)
-    cap = 'prefix:\\'(pos_res :flat, named_res :flat :named)
+    cap = 'prefix:\'(pos_res :flat, named_res :flat :named)
     push result_list, cap
     goto multi_it_loop
   check_error: