fix anonymous function args order.

1 files changed, 8 insertions, 8 deletions

diff --git a/spec/outputs/5.1/attrib.lua b/spec/outputs/5.1/attrib.lua
index e28dca4..7391e6e 100644
--- a/spec/outputs/5.1/attrib.lua
+++ b/spec/outputs/5.1/attrib.lua
@@ -50,7 +50,7 @@ do
                 a, b = _obj_0[1], _obj_0[2]
         end
 end
-local _anon_func_0 = function(f, error, _close_1, _arg_0, ...)
+local _anon_func_0 = function(_close_1, error, f, _arg_0, ...)
         do
                 local _ok_0 = _arg_0
                 _close_1(f)
@@ -88,10 +88,10 @@ do
         end)(pcall(function(...)
                 local f = _anon_func_1(io)
                 local _close_1 = assert(getmetatable(f).__close)
-                return _anon_func_0(f, error, _close_1, pcall(function(...) end, ...))
+                return _anon_func_0(_close_1, error, f, pcall(function(...) end, ...))
         end, ...))
 end
-local _anon_func_2 = function(d, error, _close_1, _arg_0, ...)
+local _anon_func_2 = function(_close_1, d, error, _arg_0, ...)
         do
                 local _ok_0 = _arg_0
                 _close_1(d)
@@ -149,10 +149,10 @@ do
                 local c = _anon_func_3(x)
                 local d = _anon_func_4(a, b)
                 local _close_1 = assert(getmetatable(d).__close)
-                return _anon_func_2(d, error, _close_1, pcall(function(...) end, ...))
+                return _anon_func_2(_close_1, d, error, pcall(function(...) end, ...))
         end, ...))
 end
-local _anon_func_6 = function(_, error, _close_1, _arg_0, ...)
+local _anon_func_6 = function(_, _close_1, error, _arg_0, ...)
         do
                 local _ok_0 = _arg_0
                 _close_1(_)
@@ -196,7 +196,7 @@ do
                         end
                 })
                 local _close_1 = assert(getmetatable(_).__close)
-                return _anon_func_6(_, error, _close_1, pcall(function(...)
+                return _anon_func_6(_, _close_1, error, pcall(function(...)
                         local _ = setmetatable({ }, {
                                 __close = function()
                                         return print("first")
@@ -220,7 +220,7 @@ def = function(item)
         _defers[#_defers + 1] = item
         return _defers
 end
-local _anon_func_8 = function(_, error, _close_1, _arg_0, ...)
+local _anon_func_8 = function(_, _close_1, error, _arg_0, ...)
         do
                 local _ok_0 = _arg_0
                 _close_1(_)
@@ -260,7 +260,7 @@ do
                         return print(2)
                 end)
                 local _close_1 = assert(getmetatable(_).__close)
-                return _anon_func_8(_, error, _close_1, pcall(function(...)
+                return _anon_func_8(_, _close_1, error, pcall(function(...)
                         local _ = def(function()
                                 return print(1)
                         end)