global function

Author: sumneko

script/parser/compile.lua

@@ -2444,7 +2444,7 @@ local function parseParams(params, isLambda)
     return params
 end
 
-local function parseFunction(isLocal, isAction)
+local function parseFunction(declareType, isAction)
     local funcLeft  = getPosition(Tokens[Index], 'left')
     local funcRight = getPosition(Tokens[Index] + 7, 'right')
     local func = {
@@ -2464,7 +2464,7 @@ local function parseFunction(isLocal, isAction)
         local name = parseName()
         if name then
             local simple = parseSimple(name, true)
-            if isLocal then
+            if declareType == 'local' then
                 if simple == name then
                     createLocal(name)
                 else
@@ -2475,6 +2475,17 @@ local function parseFunction(isLocal, isAction)
                         finish = simple.finish,
                     }
                 end
+            elseif declareType == 'global' then
+                if simple == name then
+                    createGlobalDeclare(name)
+                else
+                    resolveName(name)
+                    pushError {
+                        type   = 'UNEXPECT_GFUNC_NAME',
+                        start  = simple.start,
+                        finish = simple.finish,
+                    }
+                end
             else
                 resolveName(name)
             end
@@ -3305,7 +3316,7 @@ local function parseLocal()
     end
 
     if word == 'function' then
-        local func = parseFunction(true, true)
+        local func = parseFunction('local', true)
         local name = func.name
         if name then
             func.name    = nil
@@ -3346,7 +3357,7 @@ local function parseGlobal()
 
     -- global function Name funcbody
     if word == 'function' then
-        local func = parseFunction(false, true)
+        local func = parseFunction('global', true)
         local name = func.name
         if name then
             func.name    = nil
@@ -3355,7 +3366,6 @@ local function parseGlobal()
             name.vstart  = func.start
             name.range   = func.finish
             func.parent  = name
-            createGlobalDeclare(name)
             pushActionIntoCurrentChunk(name)
             return name
         else

test/parser_test/syntax_check.lua

@@ -974,3 +974,12 @@ global x, y, z = 1, 2, 3
 local n = x + y + z
 ]]
 (nil)
+
+TEST [[
+global function f()
+    <!print!>(1)
+end
+]]
+{
+    type = 'VARIABLE_NOT_DECLARED',
+}