#1254 more non-standard symbols

Author: sumneko

doc/en-us/config.md

@@ -1216,6 +1216,13 @@ Array<string>
 * ``"-="``
 * ``"*="``
 * ``"/="``
+* ``"%="``
+* ``"^="``
+* ``"//="``
+* ``"|="``
+* ``"&="``
+* ``"<<="``
+* ``">>="``
 * ``"||"``
 * ``"&&"``
 * ``"!"``

doc/pt-br/config.md

@@ -1216,6 +1216,13 @@ Array<string>
 * ``"-="``
 * ``"*="``
 * ``"/="``
+* ``"%="``
+* ``"^="``
+* ``"//="``
+* ``"|="``
+* ``"&="``
+* ``"<<="``
+* ``">>="``
 * ``"||"``
 * ``"&&"``
 * ``"!"``

doc/zh-cn/config.md

@@ -1215,6 +1215,13 @@ Array<string>
 * ``"-="``
 * ``"*="``
 * ``"/="``
+* ``"%="``
+* ``"^="``
+* ``"//="``
+* ``"|="``
+* ``"&="``
+* ``"<<="``
+* ``">>="``
 * ``"||"``
 * ``"&&"``
 * ``"!"``

doc/zh-tw/config.md

@@ -1215,6 +1215,13 @@ Array<string>
 * ``"-="``
 * ``"*="``
 * ``"/="``
+* ``"%="``
+* ``"^="``
+* ``"//="``
+* ``"|="``
+* ``"&="``
+* ``"<<="``
+* ``">>="``
 * ``"||"``
 * ``"&&"``
 * ``"!"``

script/config/template.lua

@@ -209,7 +209,8 @@ local template = {
     ['Lua.runtime.nonstandardSymbol']       = Type.Array(Type.String << {
                                                 '//', '/**/',
                                                 '`',
-                                                '+=', '-=', '*=', '/=',
+                                                '+=', '-=', '*=', '/=', '%=', '^=', '//=',
+                                                '|=', '&=', '<<=', '>>=',
                                                 '||', '&&', '!', '!=',
                                                 'continue',
                                             }),

script/parser/compile.lua

@@ -612,7 +612,14 @@ local function expectAssign(isAction)
         if token == '+='
         or token == '-='
         or token == '*='
-        or token == '/=' then
+        or token == '/='
+        or token == '%='
+        or token == '^='
+        or token == '//='
+        or token == '|='
+        or token == '&='
+        or token == '>>='
+        or token == '<<=' then
             if not State.options.nonstandardSymbol[token] then
                 unknownSymbol()
             end

script/parser/tokens.lua

@@ -7,6 +7,11 @@ local Word   = m.R('AZ', 'az', '__', '\x80\xff') * m.R('AZ', 'az', '09', '__', '
 local Symbol = m.P'=='
             +  m.P'~='
             +  m.P'--'
+            -- non-standard:
+            +  m.P'<<='
+            +  m.P'>>='
+            +  m.P'//='
+            -- end non-standard
             +  m.P'<<'
             +  m.P'>>'
             +  m.P'<='
@@ -15,7 +20,7 @@ local Symbol = m.P'=='
             +  m.P'...'
             +  m.P'..'
             +  m.P'::'
-            -- incorrect
+            -- non-standard:
             +  m.P'!='
             +  m.P'&&'
             +  m.P'||'
@@ -24,7 +29,12 @@ local Symbol = m.P'=='
             +  m.P'+='
             +  m.P'-='
             +  m.P'*='
+            +  m.P'%='
+            +  m.P'&='
+            +  m.P'|='
+            +  m.P'^='
             +  m.P'/='
+            -- end non-standard
             -- singles
             +  m.S'+-*/!#%^&()={}[]|\\\'":;<>,.?~`'
 local Unknown = (1 - Number - Word - Symbol - Sp - Nl)^1