Updated doc.

3 files changed, 69 insertions, 9 deletions

diff --git a/spec/outputs/codes_from_doc.lua b/spec/outputs/codes_from_doc.lua
index 3b0724a..b8985e7 100644
--- a/spec/outputs/codes_from_doc.lua
+++ b/spec/outputs/codes_from_doc.lua
@@ -107,7 +107,7 @@ if cond then
 end
 end
 print("yuescript")
-print(3)
+print(2)
 print("Valid enum type:", "Static")
 do
         print(123, "hello")
@@ -992,6 +992,36 @@ local arg1 = {
         a = 0
 }
 f2(arg1, arg2)
+local findFirstEven
+findFirstEven = function(list)
+        for _index_0 = 1, #list do
+                local item = list[_index_0]
+                if type(item) == "table" then
+                        for _index_1 = 1, #item do
+                                local sub = item[_index_1]
+                                if sub % 2 == 0 then
+                                        return sub
+                                end
+                        end
+                end
+        end
+        return nil
+end
+local findFirstEven
+findFirstEven = function(list)
+        for _index_0 = 1, #list do
+                local item = list[_index_0]
+                if type(item) == "table" then
+                        for _index_1 = 1, #item do
+                                local sub = item[_index_1]
+                                if sub % 2 == 0 then
+                                        return sub
+                                end
+                        end
+                end
+        end
+        return nil
+end
 local f
 f = function(...)
         local t = {
@@ -2637,7 +2667,7 @@ if cond then
 end
 end
 print("yuescript")
-print(3)
+print(2)
 print("Valid enum type:", "Static")
 do
         print(123, "hello")
diff --git a/spec/outputs/codes_from_doc_zh.lua b/spec/outputs/codes_from_doc_zh.lua
index 89335c9..2aa354e 100644
--- a/spec/outputs/codes_from_doc_zh.lua
+++ b/spec/outputs/codes_from_doc_zh.lua
@@ -107,7 +107,7 @@ if cond then
 end
 end
 print("yuescript")
-print(3)
+print(2)
 print("有效的枚举类型:", "Static")
 do
         print(123, "hello")
@@ -986,6 +986,36 @@ local arg1 = {
         a = 0
 }
 f2(arg1, arg2)
+local findFirstEven
+findFirstEven = function(list)
+        for _index_0 = 1, #list do
+                local item = list[_index_0]
+                if type(item) == "table" then
+                        for _index_1 = 1, #item do
+                                local sub = item[_index_1]
+                                if sub % 2 == 0 then
+                                        return sub
+                                end
+                        end
+                end
+        end
+        return nil
+end
+local findFirstEven
+findFirstEven = function(list)
+        for _index_0 = 1, #list do
+                local item = list[_index_0]
+                if type(item) == "table" then
+                        for _index_1 = 1, #item do
+                                local sub = item[_index_1]
+                                if sub % 2 == 0 then
+                                        return sub
+                                end
+                        end
+                end
+        end
+        return nil
+end
 local f
 f = function(...)
         local t = {
@@ -2631,7 +2661,7 @@ if cond then
 end
 end
 print("yuescript")
-print(3)
+print(2)
 print("有效的枚举类型:", "Static")
 do
         print(123, "hello")
diff --git a/spec/outputs/compile_doc.lua b/spec/outputs/compile_doc.lua
index 3781fb9..e7d307d 100644
--- a/spec/outputs/compile_doc.lua
+++ b/spec/outputs/compile_doc.lua
@@ -2,11 +2,11 @@ local outputFolder = ...
 local _list_0 = {
         {
                 "codes_from_doc.lua",
-                "doc/docs/doc/README.md"
+                "doc/docs/doc/index.md"
         },
         {
                 "codes_from_doc_zh.lua",
-                "doc/docs/zh/doc/README.md"
+                "doc/docs/zh/doc/index.md"
         }
 }
 for _index_0 = 1, #_list_0 do
@@ -18,7 +18,7 @@ for _index_0 = 1, #_list_0 do
                 local to_lua = require("yue").to_lua
                 local text = _with_0:read("*a")
                 local codes = { }
-                for code in text:gmatch("```moonscript(.-)```") do
+                for code in text:gmatch("```yuescript[\r\n]+(.-)```[^%w]") do
                         local result, err = to_lua(code, {
                                 implicit_return_root = false,
                                 reserve_line_number = false
@@ -30,8 +30,8 @@ for _index_0 = 1, #_list_0 do
                                 os.exit(1)
                         end
                 end
-                for code in text:gmatch("<pre>(.-)</pre>") do
-                        local result, err = to_lua(code:gsub("&lt;", "<"):gsub("&gt;", ">"), {
+                for code in text:gmatch("```yue[\r\n]+(.-)```[^%w]") do
+                        local result, err = to_lua(code, {
                                 implicit_return_root = false,
                                 reserve_line_number = false
                         })