redo fix in grep

gistfile1.txt

#              !! Seq.new(class :: does Grepper {
#                     method pull-one() is raw {
#                         nqp::stmts(
#                           nqp::until(
#                             nqp::eqaddr(($_ := $!iter.pull-one),IterationEnd)
#                               || nqp::stmts(
#                                    (my int $redo = 1),
#                                    nqp::while(
#                                      $redo,
#                                      nqp::stmts(
#                                        ($redo = 0),
#                                        (my $result = nqp::handle(
#                                          $!test($_),
#                                         'LAST', ($_ := IterationEnd),
#                                         'REDO', ($redo = 1)
#                                        ))
#                                      )
#                                    ),
#                                    $result
#                                  ),
#                             nqp::null
#                           ),
#                           $_
#                        )
#                     }
#                 }.new(self, $test))