Next Perl Regex Engine 9

How does /o work?

pp_ctl.c:146:

          /* XXX runtime compiled output needs to move to the pad */
          if (pm->op_pmflags & PMf_KEEP) {
              pm->op_private &= ~OPpRUNTIME;  /* no point compiling again */
      #if !defined(USE_ITHREADS) && !defined(USE_THREADS)
              /* XXX can't change the optree at runtime either */
              cLOGOP->op_first->op_next = PL_op->op_next;
      #endif
          }




Next Copyright © 2001 M. J. Dominus