X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=regcomp.sym;h=b0b9faff7e30d9ef33a30d977b062bd84bba7dd1;hb=cd477a63b79827394e51e6698e1a59ee11fa4eeb;hp=074af132846ad6d3511a0787e34788d360d50231;hpb=e2e6a0f1870d05ddb1ce18fd8556b71330dc694c;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/regcomp.sym b/regcomp.sym
index 074af13..b0b9faf 100644
--- a/regcomp.sym
+++ b/regcomp.sym
@@ -146,21 +146,21 @@ RENUM		BRANCHJ,off 1 1	Group with independently numbered parens.
 # inline charclass data (ascii only), the 'C' store it in the structure.
 # NOTE: the relative order of the TRIE-like regops  is signifigant
 
-TRIE		TRIE,   trie 1	Match many EXACT(FL?)? at once. flags==type
-TRIEC		TRIE,   trie charclass	Same as TRIE, but with embedded charclass data
+TRIE		TRIE,     trie 1	Match many EXACT(FL?)? at once. flags==type
+TRIEC		TRIE,trie charclass	Same as TRIE, but with embedded charclass data
 
 # For start classes, contains an added fail table.
-AHOCORASICK	TRIE,   trie 1	Aho Corasick stclass. flags==type
-AHOCORASICKC	TRIE,   trie charclass	Same as AHOCORASICK, but with embedded charclass data
+AHOCORASICK	TRIE,        trie 1	Aho Corasick stclass. flags==type
+AHOCORASICKC	TRIE,trie charclass	Same as AHOCORASICK, but with embedded charclass data
 
 #*Regex Subroutines (65..66) 
-GOSUB		GOSUB,   num/ofs 2L	recurse to paren arg1 at (signed) ofs arg2
+GOSUB		GOSUB,     num/ofs 2L	recurse to paren arg1 at (signed) ofs arg2
 GOSTART		GOSTART,   no   	recurse to start of pattern
 
 #*Named references (67..69)
-NREF		NREF,    no-sv 1	Match some already matched string
-NREFF		NREF,    no-sv 1	Match already matched string, folded
-NREFFL		NREF,    no-sv 1	Match already matched string, folded in loc.
+NREF		REF,       no-sv 1	Match some already matched string
+NREFF		REF,       no-sv 1	Match already matched string, folded
+NREFFL		REF,       no-sv 1	Match already matched string, folded in loc.
 
 
 #*Special conditionals  (70..72)
@@ -168,19 +168,33 @@ NGROUPP		NGROUPP,   no-sv 1	Whether the group matched.
 INSUBP		INSUBP,    num 1 	Whether we are in a specific recurse.  
 DEFINEP		DEFINEP,   none 1 	Never execute directly.               
 
-#*Bactracking 
+#*Bactracking Verbs
 ENDLIKE		ENDLIKE,   none		Used only for the type field of verbs
 OPFAIL		ENDLIKE,   none 	Same as (?!)
 ACCEPT		ENDLIKE,   parno 1 	Accepts the current matched string.
+
+
+#*Verbs With Arguments
 VERB		VERB,	   no-sv 1	Used only for the type field of verbs
-NOMATCH		VERB,      no-sv 1 	Pattern fails at this startpoint if no-backtracking through this 
+PRUNE		VERB,      no-sv 1 	Pattern fails at this startpoint if no-backtracking through this 
 MARKPOINT	VERB,      no-sv 1	Push the current location for rollback by cut.
-CUT		VERB,      no-sv 1	On failure cut the string at the mark.
+SKIP		VERB,      no-sv 1	On failure skip forward (to the mark) before retrying
 COMMIT		VERB,      no-sv 1	Pattern fails outright if backtracking through this
+CUTGROUP	VERB,      no-sv 1	On failure go to the next alternation in the group
+
+#*Control what to keep in $&.
+KEEPS		KEEPS,  no	$& begins here.
 
+#*New charclass like patterns
+LNBREAK		LNBREAK,   none		generic newline pattern
+VERTWS		VERTWS,    none		vertical whitespace         (Perl 6)
+NVERTWS		NVERTWS,   none		not vertical whitespace     (Perl 6)
+HORIZWS		HORIZWS,   none		horizontal whitespace       (Perl 6)
+NHORIZWS	NHORIZWS,  none		not horizontal whitespace   (Perl 6)
 
+FOLDCHAR	FOLDCHAR,  codepoint 1	codepoint with tricky case folding properties.
 
-# NEW STUFF ABOVE THIS LINE -- Please update counts below. 
+# NEW STUFF ABOVE THIS LINE  
 
 ################################################################################
 
@@ -217,4 +231,6 @@ IFMATCH 	A:FAIL
 CURLY   	B_min_known,B_min,B_max:FAIL	
 COMMIT		next:FAIL
 MARKPOINT	next:FAIL
-CUT		next:FAIL
+SKIP		next:FAIL
+CUTGROUP	next:FAIL
+KEEPS		next:FAIL