liujianjun
/
tslediter
3
0
Fork 1
Code Issues Pull Requests Projects Releases Wiki Activity

编辑器 

别名--跳转
This commit is contained in:
JianjunLiu 2023-04-26 09:54:45 +08:00
parent e72305506f
commit 5efd806288
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
designer/utslsynmemo.tsf
View File

@ -1808,7 +1808,7 @@ type TTsfFileParser = class() //
rl := length(r); rl := length(r);
for i,v in us do for i,v in us do
begin begin
for j,vj in FNsCaches[v] do for j,vj in FNsCaches[lowercase(v)] do
begin begin
if vj then if vj then
begin begin
@ -1832,11 +1832,11 @@ type TTsfFileParser = class() //
vi := LoadByName(vfn); vi := LoadByName(vfn);
if vi then if vi then
begin begin
if vi["msg"] in dounits then if dounits[vi["msg"]] then
begin begin
continue; continue;
end end
dounits[length(dounits)] := vi["msg"] ; dounits[vi["msg"]] := 1 ;
us[length(us)] := vfn; us[length(us)] := vfn;
uso[length(uso)] := vi; uso[length(uso)] := vi;
getinheriteds(vi,m,dounits,us,uso,cs,cso); getinheriteds(vi,m,dounits,us,uso,cs,cso);
@ -1850,8 +1850,8 @@ type TTsfFileParser = class() //
vi := LoadByName(vfn); vi := LoadByName(vfn);
if vi then if vi then
begin begin
if vi["msg"] in dounits then continue; if dounits[vi["msg"] ] then continue;
dounits[length(dounits)] := vi["msg"]; dounits[vi["msg"]] := 1;
cs[length(cs)] := vfn; cs[length(cs)] := vfn;
cso[length(cso)] := vi; cso[length(cso)] := vi;
getinheriteds(vi,m,dounits,us,uso,cs,cso); getinheriteds(vi,m,dounits,us,uso,cs,cso);
@ -1891,7 +1891,7 @@ type TTsfFileParser = class() //
FormatFunction(rti,r["functions"],rt,"",r["lines"],ext,1); FormatFunction(rti,r["functions"],rt,"",r["lines"],ext,1);
FormatBlocks(rti,r["blcks"],rt,"",nil,ext,1); FormatBlocks(rti,r["blcks"],rt,"",nil,ext,1);
FormatWords(rti,r["words"],rt,"",ext,1); FormatWords(rti,r["words"],rt,"",ext,1);
dounits := array(vmsg); dounits := array(vmsg:1);
getinheriteds(r,m,dounits,us,uso,cs,cso); getinheriteds(r,m,dounits,us,uso,cs,cso);
for i,v in us do //µ¥Ôª for i,v in us do //µ¥Ôª
begin begin