From 56eb2aaaac84e44d4476a300dc92fe7b20e1eec4 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Mon, 2 Feb 2015 16:26:38 +0100
Subject: [PATCH] fix, error/warning position not found in D interface files.

---
 src/ce_messages.pas | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/ce_messages.pas b/src/ce_messages.pas
index 15a1bf61..431d5ed3 100644
--- a/src/ce_messages.pas
+++ b/src/ce_messages.pas
@@ -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);