1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
-
-
-
+
+
+
-
-
+
+
-
-
+
+
|
local 字集库 = require("u8_to_a")
local 文库 = require(字集库.u8_to_a("算机_程语_月_基类_文"))
local string = string
local s = {}
-- 单行注与多行注
--~ 文
function s.删注(o1)
o1 = s.删多行注(o1)
return s.删单行注(o1)
function s.删注(u1)
u1 = s.删多行注(u1)
return s.删单行注(u1)
end
do
local k1
--~ 模
k1 = 文库.连("%-%-", "%[", "(=*)", "%[", ".-", "%]", "%1", "%]")
--~ 文
function s.删多行注(o1)
return string.gsub(o1, k1, "")
function s.删多行注(u1)
return string.gsub(u1, k1, "")
end
end
do
local k1
--~ 模
k1 = 文库.连("%-%-", "[^\n]*")
--~ 文
function s.删单行注(o1)
return string.gsub(o1, k1, "")
function s.删单行注(u1)
return string.gsub(u1, k1, "")
end
end
return s
|