forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

simplified line nbr parser

This commit is contained in:
Basile Burg 2015-05-03 17:51:25 +02:00
parent ba739df7c2
commit d0ed450c53
1 changed files with 14 additions and 27 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
src/ce_messages.pas
View File

@ -724,17 +724,6 @@ begin
while (true) do while (true) do
begin begin
if i > length(aMessage) then exit; if i > length(aMessage) then exit;
if aMessage[i] = '.' then
begin
inc(i);
if i > length(aMessage) then exit;
if aMessage[i] = 'd' then
begin
inc(i);
if i > length(aMessage) then exit;
if aMessage[i] = 'i' then
inc(i);
if i > length(aMessage) then exit;
if aMessage[i] = '(' then if aMessage[i] = '(' then
begin begin
inc(i); inc(i);
@ -759,8 +748,6 @@ begin
exit; exit;
end; end;
end; end;
end;
end;
inc(i); inc(i);
end; end;
end; end;