perldelta for unterminated here-docs

[perl5.git] / regcomp.sym

diff --git a/regcomp.sym b/regcomp.sym
index c36a7fc..e8400b9 100644 (file)
--- a/regcomp.sym
+++ b/regcomp.sym
@@ -9,7 +9,8 @@
 # Note that the order in this file is important.
 #
 # Format for first section: 
-# NAME \s+ TYPE, arg-description [flags] [num-args] [longjump-len] ; DESCRIPTION
+# NAME \s+ TYPE, arg-description [num-args] [flags] [longjump-len] ; DESCRIPTION
+#   flag <S> means is REGNODE_SIMPLE; flag <V> means is REGNODE_VARIES
 #
 #
 # run perl regen.pl after editing this file
@@ -84,6 +85,15 @@ NDIGIT      NDIGIT,     no 0 S    ; Match any non-numeric character using native
 NDIGITL     NDIGIT,     no 0 S    ; Match any non-numeric character in locale
 PLACEHOLDER2 NOTHING,   no        ; placeholder for missing NDIGITU
 NDIGITA     NDIGIT,     no 0 S    ; Match [^0-9]
+
+POSIXD      POSIXD,     none 0 S   ; currently unused except as a placeholder
+POSIXL      POSIXD,     none 0 S   ; currently unused except as a placeholder
+POSIXU      POSIXD,     none 0 S   ; currently unused except as a placeholder
+POSIXA      POSIXD,     none 0 S   ; Some [[:class:]] under /a; the FLAGS field gives which one
+NPOSIXD     POSIXD,     none 0 S   ; currently unused except as a placeholder
+NPOSIXL     POSIXD,     none 0 S   ; currently unused except as a placeholder
+NPOSIXU     POSIXD,     none 0 S   ; currently unused except as a placeholder
+NPOSIXA     POSIXD,     none 0 S   ; complement of POSIXA, [[:^class:]]
 # End of order is important (within groups)
 
 CLUMP       CLUMP,      no 0 V    ; Match any extended grapheme cluster sequence
@@ -227,12 +237,14 @@ KEEPS       KEEPS,      no        ; $& begins here.
 
 #*New charclass like patterns
 LNBREAK     LNBREAK,    none      ; generic newline pattern
+
+# regcomp.c expects the node number of the complement to be one greater than
+# the non-complement
 VERTWS      VERTWS,     none 0 S  ; vertical whitespace         (Perl 6)
 NVERTWS     NVERTWS,    none 0 S  ; not vertical whitespace     (Perl 6)
 HORIZWS     HORIZWS,    none 0 S  ; horizontal whitespace       (Perl 6)
 NHORIZWS    NHORIZWS,   none 0 S  ; not horizontal whitespace   (Perl 6)
 
-
 # NEW STUFF SOMEWHERE ABOVE THIS LINE
 
 ################################################################################