diff options
author | Yves Orton <demerphq@gmail.com> | 2015-10-05 00:03:10 +0200 |
---|---|---|
committer | Yves Orton <demerphq@gmail.com> | 2015-10-05 21:10:49 +0200 |
commit | fee505829585692618c3f9bb28a8f0464553ec94 (patch) | |
tree | e5c72eddb476af248072d178ddfeeecc0bc4f406 /regcomp.sym | |
parent | a2b6fd41891602e43754644a7ef0fcbc54d9e656 (diff) | |
download | perl-fee505829585692618c3f9bb28a8f0464553ec94.tar.gz |
fix perl #126186 make all verbs allow an optional arg
In perl #126186 it was pointed out we had started allowing name
arguments for verbs where we did not document them to be supported,
albeit in an inconsistent way. The previous patch cleaned up some
of the cause of this, but it seems better to just generally allow
the existing verbs to all support a mark name argument.
So this patch reverses the effect of the previous patch, and makes
all verbs, FAIL, ACCEPT, etc, allow an optional argument, and
set REGERROR/REGMARK appropriately as well.
Diffstat (limited to 'regcomp.sym')
-rw-r--r-- | regcomp.sym | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/regcomp.sym b/regcomp.sym index 201c65e03d..8f9861ab6b 100644 --- a/regcomp.sym +++ b/regcomp.sym @@ -199,9 +199,8 @@ DEFINEP DEFINEP, none 1 ; Never execute directly. #*Backtracking 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. - +OPFAIL ENDLIKE, no-sv 1 ; Same as (?!), but with verb arg +ACCEPT ENDLIKE, no-sv/num 2L ; Accepts the current matched string, with verbar #*Verbs With Arguments VERB VERB, no-sv 1 ; Used only for the type field of verbs |