From e4f8d1b3b075323968bb6dc334226dff33c0a2b0 Mon Sep 17 00:00:00 2001
From: Li Jin <dragon-fly@qq.com>
Date: Tue, 3 Feb 2026 22:42:37 +0800
Subject: Updated doc.

---
 spec/inputs/compile_doc.yue        |  4 ++--
 spec/outputs/codes_from_doc.lua    | 34 ++++++++++++++++++++++++++++++++--
 spec/outputs/codes_from_doc_zh.lua | 34 ++++++++++++++++++++++++++++++++--
 spec/outputs/compile_doc.lua       | 10 +++++-----
 4 files changed, 71 insertions(+), 11 deletions(-)

(limited to 'spec')

diff --git a/spec/inputs/compile_doc.yue b/spec/inputs/compile_doc.yue
index c189c17..db0464b 100644
--- a/spec/inputs/compile_doc.yue
+++ b/spec/inputs/compile_doc.yue
@@ -7,13 +7,13 @@ for [compiledFile, docFile] in *[
 		import "yue" as :to_lua
 		text = \read "*a"
 		codes = []
-		for code in text\gmatch "```moonscript(.-)```"
+		for code in text\gmatch "```yuescript[\r\n]+(.-)```[^%w]"
 			if result, err := to_lua code, implicit_return_root: false, reserve_line_number: false
 				codes[] = result
 			elseif not err\match "macro exporting module only accepts macro definition"
 				print err
 				os.exit 1
-		for code in text\gmatch "```yue(.-)```"
+		for code in text\gmatch "```yue[\r\n]+(.-)```[^%w]"
 			if result, err := to_lua code, implicit_return_root: false, reserve_line_number: false
 				codes[] = result
 			else
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
 			})
-- 
cgit v1.2.3-55-g6feb