pass tests

Author: sumneko

test/diagnostics/common.lua

@@ -1359,19 +1359,23 @@ local function f(cb)
     cb()
 end
 
-<!f!>(function () ---@async
-    return nil
-end)
+return function()
+    <!f>(function () ---@async
+        return nil
+    end)
+end
 ]]
 
 TEST [[
 local function f(cb)
     pcall(cb)
 end
 
-<!f!>(function () ---@async
-    return nil
-end)
+return function()
+    <!f!>(function () ---@async
+        return nil
+    end)
+end
 ]]
 
 TEST [[
@@ -1380,9 +1384,11 @@ local function f(c)
     return c
 end
 
-f(function () ---@async
-    return nil
-end)
+return function ()
+    f(function () ---@async
+        return nil
+    end)
+end
 ]]
 
 TEST [[
@@ -1391,9 +1397,11 @@ local function f(...)
     return ...
 end
 
-f(function () ---@async
-    return nil
-end)
+return function ()
+    f(function () ---@async
+        return nil
+    end)
+end
 ]]
 
 TEST [[
@@ -1402,29 +1410,35 @@ local function f(...)
     return ...
 end
 
-f(function () ---@async
-    return nil
-end)
+return function ()
+    f(function () ---@async
+        return nil
+    end)
+end
 ]]
 
 TEST [[
 local function f(...)
     return ...
 end
 
-f(function () ---@async
-    return nil
-end)
+return function ()
+    f(function () ---@async
+        return nil
+    end)
+end
 ]]
 
 TEST [[
 local function f(...)
     return ...
 end
 
-f(1, function () ---@async
-    return nil
-end)
+return function ()
+    f(function () ---@async
+        return nil
+    end)
+end
 ]]
 
 TEST [[