Преглед на файлове

* Converted user defined note to info message.

git-svn-id: trunk@9551 -
yury преди 17 години
родител
ревизия
79a1b1a485
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      rtl/objpas/fgl.pp

+ 1 - 1
rtl/objpas/fgl.pp

@@ -608,7 +608,7 @@ end;
 function TFPGList.IndexOf(const Item: T): Integer;
 begin
   Result := 0;
-  {$note TODO: fix inlining to work! InternalItems[Result]^}
+  {$info TODO: fix inlining to work! InternalItems[Result]^}
   while (Result < FCount) and (PT(FList)[Result] <> Item) do
     Inc(Result);
   if Result = FCount then