From 20db78597b92cec00dd6f650278c3cdcf6e3e4bf Mon Sep 17 00:00:00 2001 From: Li Jin Date: Fri, 24 Apr 2026 10:19:45 +0800 Subject: Updated docs. --- spec/outputs/codes_from_doc_de.lua | 110 ++++++++++++++++++++++++++++++++++ spec/outputs/codes_from_doc_en.lua | 110 ++++++++++++++++++++++++++++++++++ spec/outputs/codes_from_doc_id-id.lua | 110 ++++++++++++++++++++++++++++++++++ spec/outputs/codes_from_doc_pt-br.lua | 110 ++++++++++++++++++++++++++++++++++ spec/outputs/codes_from_doc_zh.lua | 110 ++++++++++++++++++++++++++++++++++ 5 files changed, 550 insertions(+) (limited to 'spec') diff --git a/spec/outputs/codes_from_doc_de.lua b/spec/outputs/codes_from_doc_de.lua index 2530977..e1346db 100644 --- a/spec/outputs/codes_from_doc_de.lua +++ b/spec/outputs/codes_from_doc_de.lua @@ -143,6 +143,61 @@ end do print(123, "hallo") end +local myFunc +myFunc = function() end +do + print("myFunc") +end +return +-- before:tableA +local tableA = { } +local tableB = { } +-- after:tableB +return +local registry = { } +local Worker +do + local _class_0 + local _base_0 = { + run = function(self) + return "ok" + end + } + if _base_0.__index == nil then + _base_0.__index = _base_0 + end + _class_0 = setmetatable({ + __init = function() end, + __base = _base_0, + __name = "Worker" + }, { + __index = _base_0, + __call = function(cls, ...) + local _self_0 = setmetatable({ }, _base_0) + cls.__init(_self_0, ...) + return _self_0 + end + }) + _base_0.__class = _class_0 + Worker = _class_0 +end +do + registry["Worker"] = Worker +end +return +local add +add = function(a, b) + return a + b +end +do + local __orig_add = add + add = function(...) + for i = 1, select("#", ...) do + assert(type(select(i, ...)) == "number", "expected number for arg " .. tostring(i)) + end + return __orig_add(...) + end +end local area = 6.2831853071796 * 5 print('Hallo Welt') do @@ -194,6 +249,61 @@ end do print(123, "hallo") end +local myFunc +myFunc = function() end +do + print("myFunc") +end +return +-- before:tableA +local tableA = { } +local tableB = { } +-- after:tableB +return +local registry = { } +local Worker +do + local _class_0 + local _base_0 = { + run = function(self) + return "ok" + end + } + if _base_0.__index == nil then + _base_0.__index = _base_0 + end + _class_0 = setmetatable({ + __init = function() end, + __base = _base_0, + __name = "Worker" + }, { + __index = _base_0, + __call = function(cls, ...) + local _self_0 = setmetatable({ }, _base_0) + cls.__init(_self_0, ...) + return _self_0 + end + }) + _base_0.__class = _class_0 + Worker = _class_0 +end +do + registry["Worker"] = Worker +end +return +local add +add = function(a, b) + return a + b +end +do + local __orig_add = add + add = function(...) + for i = 1, select("#", ...) do + assert(type(select(i, ...)) == "number", "expected number for arg " .. tostring(i)) + end + return __orig_add(...) + end +end xpcall(function() return func(1, 2, 3) end, function(err) diff --git a/spec/outputs/codes_from_doc_en.lua b/spec/outputs/codes_from_doc_en.lua index 18f0227..1a6469d 100644 --- a/spec/outputs/codes_from_doc_en.lua +++ b/spec/outputs/codes_from_doc_en.lua @@ -143,6 +143,61 @@ end do print(123, "hello") end +local myFunc +myFunc = function() end +do + print("myFunc") +end +return +-- before:tableA +local tableA = { } +local tableB = { } +-- after:tableB +return +local registry = { } +local Worker +do + local _class_0 + local _base_0 = { + run = function(self) + return "ok" + end + } + if _base_0.__index == nil then + _base_0.__index = _base_0 + end + _class_0 = setmetatable({ + __init = function() end, + __base = _base_0, + __name = "Worker" + }, { + __index = _base_0, + __call = function(cls, ...) + local _self_0 = setmetatable({ }, _base_0) + cls.__init(_self_0, ...) + return _self_0 + end + }) + _base_0.__class = _class_0 + Worker = _class_0 +end +do + registry["Worker"] = Worker +end +return +local add +add = function(a, b) + return a + b +end +do + local __orig_add = add + add = function(...) + for i = 1, select("#", ...) do + assert(type(select(i, ...)) == "number", "expected number for arg " .. tostring(i)) + end + return __orig_add(...) + end +end local area = 6.2831853071796 * 5 print('hello world') do @@ -194,6 +249,61 @@ end do print(123, "hello") end +local myFunc +myFunc = function() end +do + print("myFunc") +end +return +-- before:tableA +local tableA = { } +local tableB = { } +-- after:tableB +return +local registry = { } +local Worker +do + local _class_0 + local _base_0 = { + run = function(self) + return "ok" + end + } + if _base_0.__index == nil then + _base_0.__index = _base_0 + end + _class_0 = setmetatable({ + __init = function() end, + __base = _base_0, + __name = "Worker" + }, { + __index = _base_0, + __call = function(cls, ...) + local _self_0 = setmetatable({ }, _base_0) + cls.__init(_self_0, ...) + return _self_0 + end + }) + _base_0.__class = _class_0 + Worker = _class_0 +end +do + registry["Worker"] = Worker +end +return +local add +add = function(a, b) + return a + b +end +do + local __orig_add = add + add = function(...) + for i = 1, select("#", ...) do + assert(type(select(i, ...)) == "number", "expected number for arg " .. tostring(i)) + end + return __orig_add(...) + end +end xpcall(function() return func(1, 2, 3) end, function(err) diff --git a/spec/outputs/codes_from_doc_id-id.lua b/spec/outputs/codes_from_doc_id-id.lua index 452d88d..868c6ec 100644 --- a/spec/outputs/codes_from_doc_id-id.lua +++ b/spec/outputs/codes_from_doc_id-id.lua @@ -143,6 +143,61 @@ end do print(123, "hello") end +local myFunc +myFunc = function() end +do + print("myFunc") +end +return +-- before:tableA +local tableA = { } +local tableB = { } +-- after:tableB +return +local registry = { } +local Worker +do + local _class_0 + local _base_0 = { + run = function(self) + return "ok" + end + } + if _base_0.__index == nil then + _base_0.__index = _base_0 + end + _class_0 = setmetatable({ + __init = function() end, + __base = _base_0, + __name = "Worker" + }, { + __index = _base_0, + __call = function(cls, ...) + local _self_0 = setmetatable({ }, _base_0) + cls.__init(_self_0, ...) + return _self_0 + end + }) + _base_0.__class = _class_0 + Worker = _class_0 +end +do + registry["Worker"] = Worker +end +return +local add +add = function(a, b) + return a + b +end +do + local __orig_add = add + add = function(...) + for i = 1, select("#", ...) do + assert(type(select(i, ...)) == "number", "expected number for arg " .. tostring(i)) + end + return __orig_add(...) + end +end local area = 6.2831853071796 * 5 print('hello world') do @@ -194,6 +249,61 @@ end do print(123, "hello") end +local myFunc +myFunc = function() end +do + print("myFunc") +end +return +-- before:tableA +local tableA = { } +local tableB = { } +-- after:tableB +return +local registry = { } +local Worker +do + local _class_0 + local _base_0 = { + run = function(self) + return "ok" + end + } + if _base_0.__index == nil then + _base_0.__index = _base_0 + end + _class_0 = setmetatable({ + __init = function() end, + __base = _base_0, + __name = "Worker" + }, { + __index = _base_0, + __call = function(cls, ...) + local _self_0 = setmetatable({ }, _base_0) + cls.__init(_self_0, ...) + return _self_0 + end + }) + _base_0.__class = _class_0 + Worker = _class_0 +end +do + registry["Worker"] = Worker +end +return +local add +add = function(a, b) + return a + b +end +do + local __orig_add = add + add = function(...) + for i = 1, select("#", ...) do + assert(type(select(i, ...)) == "number", "expected number for arg " .. tostring(i)) + end + return __orig_add(...) + end +end xpcall(function() return func(1, 2, 3) end, function(err) diff --git a/spec/outputs/codes_from_doc_pt-br.lua b/spec/outputs/codes_from_doc_pt-br.lua index f9784d7..ce8c016 100644 --- a/spec/outputs/codes_from_doc_pt-br.lua +++ b/spec/outputs/codes_from_doc_pt-br.lua @@ -143,6 +143,61 @@ end do print(123, "hello") end +local myFunc +myFunc = function() end +do + print("myFunc") +end +return +-- before:tableA +local tableA = { } +local tableB = { } +-- after:tableB +return +local registry = { } +local Worker +do + local _class_0 + local _base_0 = { + run = function(self) + return "ok" + end + } + if _base_0.__index == nil then + _base_0.__index = _base_0 + end + _class_0 = setmetatable({ + __init = function() end, + __base = _base_0, + __name = "Worker" + }, { + __index = _base_0, + __call = function(cls, ...) + local _self_0 = setmetatable({ }, _base_0) + cls.__init(_self_0, ...) + return _self_0 + end + }) + _base_0.__class = _class_0 + Worker = _class_0 +end +do + registry["Worker"] = Worker +end +return +local add +add = function(a, b) + return a + b +end +do + local __orig_add = add + add = function(...) + for i = 1, select("#", ...) do + assert(type(select(i, ...)) == "number", "expected number for arg " .. tostring(i)) + end + return __orig_add(...) + end +end local area = 6.2831853071796 * 5 print('hello world') do @@ -194,6 +249,61 @@ end do print(123, "hello") end +local myFunc +myFunc = function() end +do + print("myFunc") +end +return +-- before:tableA +local tableA = { } +local tableB = { } +-- after:tableB +return +local registry = { } +local Worker +do + local _class_0 + local _base_0 = { + run = function(self) + return "ok" + end + } + if _base_0.__index == nil then + _base_0.__index = _base_0 + end + _class_0 = setmetatable({ + __init = function() end, + __base = _base_0, + __name = "Worker" + }, { + __index = _base_0, + __call = function(cls, ...) + local _self_0 = setmetatable({ }, _base_0) + cls.__init(_self_0, ...) + return _self_0 + end + }) + _base_0.__class = _class_0 + Worker = _class_0 +end +do + registry["Worker"] = Worker +end +return +local add +add = function(a, b) + return a + b +end +do + local __orig_add = add + add = function(...) + for i = 1, select("#", ...) do + assert(type(select(i, ...)) == "number", "expected number for arg " .. tostring(i)) + end + return __orig_add(...) + end +end xpcall(function() return func(1, 2, 3) end, function(err) diff --git a/spec/outputs/codes_from_doc_zh.lua b/spec/outputs/codes_from_doc_zh.lua index 4c254a2..2f849b8 100644 --- a/spec/outputs/codes_from_doc_zh.lua +++ b/spec/outputs/codes_from_doc_zh.lua @@ -143,6 +143,61 @@ end do print(123, "hello") end +local myFunc +myFunc = function() end +do + print("myFunc") +end +return +-- before:tableA +local tableA = { } +local tableB = { } +-- after:tableB +return +local registry = { } +local Worker +do + local _class_0 + local _base_0 = { + run = function(self) + return "ok" + end + } + if _base_0.__index == nil then + _base_0.__index = _base_0 + end + _class_0 = setmetatable({ + __init = function() end, + __base = _base_0, + __name = "Worker" + }, { + __index = _base_0, + __call = function(cls, ...) + local _self_0 = setmetatable({ }, _base_0) + cls.__init(_self_0, ...) + return _self_0 + end + }) + _base_0.__class = _class_0 + Worker = _class_0 +end +do + registry["Worker"] = Worker +end +return +local add +add = function(a, b) + return a + b +end +do + local __orig_add = add + add = function(...) + for i = 1, select("#", ...) do + assert(type(select(i, ...)) == "number", "expected number for arg " .. tostring(i)) + end + return __orig_add(...) + end +end local area = 6.2831853071796 * 5 print('你好 世界') do @@ -194,6 +249,61 @@ end do print(123, "hello") end +local myFunc +myFunc = function() end +do + print("myFunc") +end +return +-- before:tableA +local tableA = { } +local tableB = { } +-- after:tableB +return +local registry = { } +local Worker +do + local _class_0 + local _base_0 = { + run = function(self) + return "ok" + end + } + if _base_0.__index == nil then + _base_0.__index = _base_0 + end + _class_0 = setmetatable({ + __init = function() end, + __base = _base_0, + __name = "Worker" + }, { + __index = _base_0, + __call = function(cls, ...) + local _self_0 = setmetatable({ }, _base_0) + cls.__init(_self_0, ...) + return _self_0 + end + }) + _base_0.__class = _class_0 + Worker = _class_0 +end +do + registry["Worker"] = Worker +end +return +local add +add = function(a, b) + return a + b +end +do + local __orig_add = add + add = function(...) + for i = 1, select("#", ...) do + assert(type(select(i, ...)) == "number", "expected number for arg " .. tostring(i)) + end + return __orig_add(...) + end +end xpcall(function() return func(1, 2, 3) end, function(err) -- cgit v1.2.3-55-g6feb