X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/d09b2d29781629d5f0436d3a59d2552621af768b..fc2c2f48627ad2aa687bf62319411314bd55a226:/regnodes.h

diff --git a/regnodes.h b/regnodes.h
index 445d0b2..c494dae 100644
--- a/regnodes.h
+++ b/regnodes.h
@@ -8,58 +8,59 @@
 #define	BOL	2	/*  0x2 Match "" at beginning of line. */
 #define	MBOL	3	/*  0x3 Same, assuming multiline. */
 #define	SBOL	4	/*  0x4 Same, assuming singleline. */
-#define	EOL	5	/*  0x5 Match "" at end of line. */
-#define	MEOL	6	/*  0x6 Same, assuming multiline. */
-#define	SEOL	7	/*  0x7 Same, assuming singleline. */
-#define	BOUND	8	/*  0x8 Match "" at any word boundary */
-#define	BOUNDL	9	/*  0x9 Match "" at any word boundary */
-#define	NBOUND	10	/*  0xa Match "" at any word non-boundary */
-#define	NBOUNDL	11	/*  0xb Match "" at any word non-boundary */
-#define	GPOS	12	/*  0xc Matches where last m//g left off. */
-#define	ANY	13	/*  0xd Match any one character (except newline). */
-#define	SANY	14	/*  0xe Match any one character. */
-#define	ANYOF	15	/*  0xf Match character in (or not in) this class. */
-#define	ALNUM	16	/* 0x10 Match any alphanumeric character */
-#define	ALNUML	17	/* 0x11 Match any alphanumeric char in locale */
-#define	NALNUM	18	/* 0x12 Match any non-alphanumeric character */
-#define	NALNUML	19	/* 0x13 Match any non-alphanumeric char in locale */
-#define	SPACE	20	/* 0x14 Match any whitespace character */
-#define	SPACEL	21	/* 0x15 Match any whitespace char in locale */
-#define	NSPACE	22	/* 0x16 Match any non-whitespace character */
-#define	NSPACEL	23	/* 0x17 Match any non-whitespace char in locale */
-#define	DIGIT	24	/* 0x18 Match any numeric character */
-#define	NDIGIT	25	/* 0x19 Match any non-numeric character */
-#define	BRANCH	26	/* 0x1a Match this alternative, or the next... */
-#define	BACK	27	/* 0x1b Match "", "next" ptr points backward. */
-#define	EXACT	28	/* 0x1c Match this string (preceded by length). */
-#define	EXACTF	29	/* 0x1d Match this string, folded (prec. by length). */
-#define	EXACTFL	30	/* 0x1e Match this string, folded in locale (w/len). */
-#define	NOTHING	31	/* 0x1f Match empty string. */
-#define	TAIL	32	/* 0x20 Match empty string. Can jump here from outside. */
-#define	STAR	33	/* 0x21 Match this (simple) thing 0 or more times. */
-#define	PLUS	34	/* 0x22 Match this (simple) thing 1 or more times. */
-#define	CURLY	35	/* 0x23 Match this simple thing {n,m} times. */
-#define	CURLYN	36	/* 0x24 Match next-after-this simple thing  */
-#define	CURLYM	37	/* 0x25 Match this medium-complex thing {n,m} times. */
-#define	CURLYX	38	/* 0x26 Match this complex thing {n,m} times. */
-#define	WHILEM	39	/* 0x27 Do curly processing and see if rest matches. */
-#define	OPEN	40	/* 0x28 Mark this point in input as start of #n. */
-#define	CLOSE	41	/* 0x29 Analogous to OPEN. */
-#define	REF	42	/* 0x2a Match some already matched string */
-#define	REFF	43	/* 0x2b Match already matched string, folded */
-#define	REFFL	44	/* 0x2c Match already matched string, folded in loc. */
-#define	IFMATCH	45	/* 0x2d Succeeds if the following matches. */
-#define	UNLESSM	46	/* 0x2e Fails if the following matches. */
-#define	SUSPEND	47	/* 0x2f "Independent" sub-RE. */
-#define	IFTHEN	48	/* 0x30 Switch, should be preceeded by switcher . */
-#define	GROUPP	49	/* 0x31 Whether the group matched. */
-#define	LONGJMP	50	/* 0x32 Jump far away. */
-#define	BRANCHJ	51	/* 0x33 BRANCH with long offset. */
-#define	EVAL	52	/* 0x34 Execute some Perl code. */
-#define	MINMOD	53	/* 0x35 Next operator is not greedy. */
-#define	LOGICAL	54	/* 0x36 Next opcode should set the flag only. */
-#define	RENUM	55	/* 0x37 Group with independently numbered parens. */
-#define	OPTIMIZED	56	/* 0x38 Placeholder for dump. */
+#define	EOS	5	/*  0x5 Match "" at end of string. */
+#define	EOL	6	/*  0x6 Match "" at end of line. */
+#define	MEOL	7	/*  0x7 Same, assuming multiline. */
+#define	SEOL	8	/*  0x8 Same, assuming singleline. */
+#define	BOUND	9	/*  0x9 Match "" at any word boundary */
+#define	BOUNDL	10	/*  0xa Match "" at any word boundary */
+#define	NBOUND	11	/*  0xb Match "" at any word non-boundary */
+#define	NBOUNDL	12	/*  0xc Match "" at any word non-boundary */
+#define	GPOS	13	/*  0xd Matches where last m//g left off. */
+#define	ANY	14	/*  0xe Match any one character (except newline). */
+#define	SANY	15	/*  0xf Match any one character. */
+#define	ANYOF	16	/* 0x10 Match character in (or not in) this class. */
+#define	ALNUM	17	/* 0x11 Match any alphanumeric character */
+#define	ALNUML	18	/* 0x12 Match any alphanumeric char in locale */
+#define	NALNUM	19	/* 0x13 Match any non-alphanumeric character */
+#define	NALNUML	20	/* 0x14 Match any non-alphanumeric char in locale */
+#define	SPACE	21	/* 0x15 Match any whitespace character */
+#define	SPACEL	22	/* 0x16 Match any whitespace char in locale */
+#define	NSPACE	23	/* 0x17 Match any non-whitespace character */
+#define	NSPACEL	24	/* 0x18 Match any non-whitespace char in locale */
+#define	DIGIT	25	/* 0x19 Match any numeric character */
+#define	NDIGIT	26	/* 0x1a Match any non-numeric character */
+#define	BRANCH	27	/* 0x1b Match this alternative, or the next... */
+#define	BACK	28	/* 0x1c Match "", "next" ptr points backward. */
+#define	EXACT	29	/* 0x1d Match this string (preceded by length). */
+#define	EXACTF	30	/* 0x1e Match this string, folded (prec. by length). */
+#define	EXACTFL	31	/* 0x1f Match this string, folded in locale (w/len). */
+#define	NOTHING	32	/* 0x20 Match empty string. */
+#define	TAIL	33	/* 0x21 Match empty string. Can jump here from outside. */
+#define	STAR	34	/* 0x22 Match this (simple) thing 0 or more times. */
+#define	PLUS	35	/* 0x23 Match this (simple) thing 1 or more times. */
+#define	CURLY	36	/* 0x24 Match this simple thing {n,m} times. */
+#define	CURLYN	37	/* 0x25 Match next-after-this simple thing  */
+#define	CURLYM	38	/* 0x26 Match this medium-complex thing {n,m} times. */
+#define	CURLYX	39	/* 0x27 Match this complex thing {n,m} times. */
+#define	WHILEM	40	/* 0x28 Do curly processing and see if rest matches. */
+#define	OPEN	41	/* 0x29 Mark this point in input as start of #n. */
+#define	CLOSE	42	/* 0x2a Analogous to OPEN. */
+#define	REF	43	/* 0x2b Match some already matched string */
+#define	REFF	44	/* 0x2c Match already matched string, folded */
+#define	REFFL	45	/* 0x2d Match already matched string, folded in loc. */
+#define	IFMATCH	46	/* 0x2e Succeeds if the following matches. */
+#define	UNLESSM	47	/* 0x2f Fails if the following matches. */
+#define	SUSPEND	48	/* 0x30 "Independent" sub-RE. */
+#define	IFTHEN	49	/* 0x31 Switch, should be preceeded by switcher . */
+#define	GROUPP	50	/* 0x32 Whether the group matched. */
+#define	LONGJMP	51	/* 0x33 Jump far away. */
+#define	BRANCHJ	52	/* 0x34 BRANCH with long offset. */
+#define	EVAL	53	/* 0x35 Execute some Perl code. */
+#define	MINMOD	54	/* 0x36 Next operator is not greedy. */
+#define	LOGICAL	55	/* 0x37 Next opcode should set the flag only. */
+#define	RENUM	56	/* 0x38 Group with independently numbered parens. */
+#define	OPTIMIZED	57	/* 0x39 Placeholder for dump. */
 
 #ifndef DOINIT
 EXTCONST U8 regkind[];
@@ -70,6 +71,7 @@ EXTCONST U8 regkind[] = {
 	BOL,		/* BOL */
 	BOL,		/* MBOL */
 	BOL,		/* SBOL */
+	EOL,		/* EOS */
 	EOL,		/* EOL */
 	EOL,		/* MEOL */
 	EOL,		/* SEOL */
@@ -133,6 +135,7 @@ const static U8 regarglen[] = {
 	0,		/* BOL */
 	0,		/* MBOL */
 	0,		/* SBOL */
+	0,		/* EOS */
 	0,		/* EOL */
 	0,		/* MEOL */
 	0,		/* SEOL */
@@ -193,6 +196,7 @@ const static char reg_off_by_arg[] = {
 	0,		/* BOL */
 	0,		/* MBOL */
 	0,		/* SBOL */
+	0,		/* EOS */
 	0,		/* EOL */
 	0,		/* MEOL */
 	0,		/* SEOL */