fix, error/warning position not found in D interface files.

This commit is contained in:
Basile Burg 2015-02-02 16:26:38 +01:00
parent 61bf491f4c
commit 56eb2aaaac
1 changed files with 3 additions and 0 deletions

View File

@ -606,6 +606,9 @@ begin
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
begin
inc(i);