Переглянути джерело

* 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