Fudge m// to return Match object (moritz)

TODO

@@ -61,9 +61,6 @@ MEDIUM
    Audit accelerated context routines for correct undefined value and odd
    representation handling.  +Num shouldn't crash, etc.
 
- +*A general procedure for communicating data up and down the meta-spiral.
-   Use this to make a very simple eval knockoff.
-
  + Run MAIN without a temporary file (needed for eval knockoff).
 
 HARD

lib/SAFE.setting

@@ -971,6 +971,7 @@ my class Cursor {
 }
 
 my class Match is Cool {
+    method ACCEPTS($) { self // nextsame }
     method list () { @( self.Capture ) }
     method hash () { %( self.Capture ) }
     method flat () { @( self.Capture ) }

src/niecza

@@ -26,10 +26,9 @@ use Operator;
 augment class NieczaActions {
 method quote:rx ($/) { make self.op_for_regex($/, $<quibble>.ast); }
 method quote:m  ($/) {
-    make mkcall($/, '&prefix:<?>',
-        ::Op::CallMethod.new(|node($/), name => 'ACCEPTS',
+    make ::Op::CallMethod.new(|node($/), name => 'ACCEPTS',
             receiver => self.op_for_regex($/, $<quibble>.ast),
-            args => [ mklex($/, '$_') ]));
+            args => [ mklex($/, '$_') ]);
 }
 
 # actually we need a few more special cases here.