Field :param attributes, //= and ||= default assignments

1 files changed, 3 insertions, 2 deletions

diff --git a/toke.c b/toke.c
index f92c391eb0..cb9e001eab 100644
--- a/toke.c
+++ b/toke.c
@@ -6043,8 +6043,9 @@ yyl_colon(pTHX_ char *s)
         if (*s != ';'
             && *s != '}'
             && !(PL_expect == XOPERATOR
-                 ? (*s == '=' ||  *s == ')')
-                 : (*s == '{' ||  *s == '(')))
+                   /* if an operator is expected, permit =, //= and ||= or ) to end */
+                 ? (*s == '=' || *s == ')' || *s == '/' || *s == '|')
+                 : (*s == '{' || *s == '(')))
         {
             const char q = ((*s == '\'') ? '"' : '\'');
             /* If here for an expression, and parsed no attrs, back off. */