Aire-One
/
LDoc2tl
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

(1) pattern for @see references did not include underscore (2) hack for grabbing block comment foiled by '--]]'

This commit is contained in:
steve donovan 2011-07-03 10:26:24 +02:00
parent 2a07ffc7d0
commit fb98cc767d
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ldoc/tools.lua
View File

@ -130,7 +130,7 @@ end
function M.expand_comma_list (ls) function M.expand_comma_list (ls)
local new_ls = List() local new_ls = List()
for s in ls:iter() do for s in ls:iter() do
s = s:gsub('[^%.:%w]*$','') s = s:gsub('[^%.:%w_]*$','')
if s:find ',' then if s:find ',' then
new_ls:extend(List.split(s,'%s*,%s*')) new_ls:extend(List.split(s,'%s*,%s*'))
else else
@ -323,13 +323,18 @@ end
function M.grab_block_comment (v,tok,end1,end2) function M.grab_block_comment (v,tok,end1,end2)
local res = {v} local res = {v}
local t,last_v local t,last_v
local t12 = end1..end2
k = 1
repeat repeat
last_v = v last_v = v
t,v = tok() t,v = tok()
if t=='comment' and v:find(t12,1,true) then t12 = nil; break end
append(res,v) append(res,v)
until last_v == end1 and v == end2 until last_v == end1 and v == end2
if t12 then
table.remove(res) table.remove(res)
table.remove(res) table.remove(res)
end
res = table.concat(res) res = table.concat(res)
return 'comment',res return 'comment',res
end end