develooper Front page | perl.perl5.porters | Postings from March 2000

(?p{}) deprecation

Thread Next
From:
scozens
Date:
March 14, 2000 01:49
Subject:
(?p{}) deprecation
Message ID:
492568A2.003543CD.00@pwj-gw-n001.pwj.co.jp




I mucked up again; the previous patch warned when it saw (?p{}),
regardless of whether this was first or second pass. This fixes
that so the warning won't appear twice. Is this a good or a bad
way to tell which pass we're in?

--- regcomp.c~ Tue Mar 14 18:28:36 2000
+++ regcomp.c  Tue Mar 14 18:32:59 2000
@@ -1732,6 +1732,7 @@
          *flagp = TRYAGAIN;
          return NULL;
         case 'p':
+         if (PL_regcode == &PL_regdummy)
          Perl_warner(aTHX_ WARN_REGEXP, "(?p{}) is deprecated - use
(??{})");
          /* FALL THROUGH*/
         case '?':



Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About