/[pcre]/code/trunk/testdata/testinput11
ViewVC logotype

Diff of /code/trunk/testdata/testinput11

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 770 by ph10, Tue Nov 22 13:36:51 2011 UTC revision 771 by ph10, Tue Nov 29 15:34:12 2011 UTC
# Line 452  with the handling of backtracking verbs. Line 452  with the handling of backtracking verbs.
452  /A(*MARK:A)A+(*SKIP:B)(B|Z) | AC(*:B)/xK  /A(*MARK:A)A+(*SKIP:B)(B|Z) | AC(*:B)/xK
453      AAAC      AAAC
454    
 /--- We use something more complicated than individual letters here, because  
 that causes different behaviour in Perl. Perhaps it disables some optimization;  
 anyway, the result now matches PCRE in that no tag is passed back for the  
 failures. ---/  
   
 /(A|P)(*:A)(B|P) | (X|P)(X|P)(*:B)(Y|P)/xK  
     AABC  
     XXYZ  
     ** Failers  
     XAQQ  
     XAQQXZZ  
     AXQQQ  
     AXXQQQ  
   
455  /--- COMMIT at the start of a pattern should act like an anchor. Again,  /--- COMMIT at the start of a pattern should act like an anchor. Again,
456  however, we need the complication for Perl. ---/  however, we need the complication for Perl. ---/
457    
# Line 803  name)/K Line 789  name)/K
789  /(a)(?2){2}(.)/  /(a)(?2){2}(.)/
790      abcd      abcd
791    
792    /(*MARK:A)(*PRUNE:B)(C|X)/KS
793        C
794        D
795    
796    /(*MARK:A)(*PRUNE:B)(C|X)/KSS
797        C
798        D
799    
800    /(*MARK:A)(*THEN:B)(C|X)/KS
801        C
802        D
803    
804    /(*MARK:A)(*THEN:B)(C|X)/KSY
805        C
806        D
807    
808    /(*MARK:A)(*THEN:B)(C|X)/KSS
809        C
810        D
811    
812    /--- This should fail, as the skip causes a bump to offset 3 (the skip) ---/
813    
814    /A(*MARK:A)A+(*SKIP)(B|Z) | AC/xK
815        AAAC
816    
817    /--- Same --/
818    
819    /A(*MARK:A)A+(*MARK:B)(*SKIP:B)(B|Z) | AC/xK
820        AAAC
821    
822    /A(*:A)A+(*SKIP)(B|Z) | AC/xK
823        AAAC
824    
825    /--- This should fail, as a null name is the same as no name ---/
826    
827    /A(*MARK:A)A+(*SKIP:)(B|Z) | AC/xK
828        AAAC
829    
830    /--- A check on what happens after hitting a mark and them bumping along to
831    something that does not even start. Perl reports tags after the failures here,
832    though it does not when the individual letters are made into something
833    more complicated. ---/
834    
835    /A(*:A)B|XX(*:B)Y/K
836        AABC
837        XXYZ
838        ** Failers
839        XAQQ
840        XAQQXZZ
841        AXQQQ
842        AXXQQQ
843    
844    /^(A(*THEN:A)B|C(*THEN:B)D)/K
845        AB
846        CD
847        ** Failers
848        AC
849        CB
850    
851    /^(A(*PRUNE:A)B|C(*PRUNE:B)D)/K
852        AB
853        CD
854        ** Failers
855        AC
856        CB
857    
858    /--- An empty name does not pass back an empty string. It is the same as if no
859    name were given. ---/
860    
861    /^(A(*PRUNE:)B|C(*PRUNE:B)D)/K
862        AB
863        CD
864    
865    /--- PRUNE goes to next bumpalong; COMMIT does not. ---/
866    
867    /A(*PRUNE:A)B/K
868        ACAB
869    
870    /--- Mark names can be duplicated ---/
871    
872    /A(*:A)B|X(*:A)Y/K
873        AABC
874        XXYZ
875    
876    /b(*:m)f|a(*:n)w/K
877        aw
878        ** Failers
879        abc
880    
881    /b(*:m)f|aw/K
882        abaw
883        ** Failers
884        abc
885        abax
886    
887    /A(*MARK:A)A+(*SKIP:B)(B|Z) | AAC/xK
888        AAAC
889    
890    /a(*PRUNE:X)bc|qq/KY
891        ** Failers
892        axy
893    
894    /a(*THEN:X)bc|qq/KY
895        ** Failers
896        axy
897    
898    /(?=a(*MARK:A)b)..x/K
899        abxy
900        ** Failers
901        abpq
902    
903    /(?=a(*MARK:A)b)..(*:Y)x/K
904        abxy
905        ** Failers
906        abpq
907    
908    /(?=a(*PRUNE:A)b)..x/K
909        abxy
910        ** Failers
911        abpq
912    
913    /(?=a(*PRUNE:A)b)..(*:Y)x/K
914        abxy
915        ** Failers
916        abpq
917    
918    /(?=a(*THEN:A)b)..x/K
919        abxy
920        ** Failers
921        abpq
922    
923    /(?=a(*THEN:A)b)..(*:Y)x/K
924        abxy
925        ** Failers
926        abpq
927    
928  /-- End of testinput11 --/  /-- End of testinput11 --/

Legend:
Removed from v.770  
changed lines
  Added in v.771

  ViewVC Help
Powered by ViewVC 1.1.5