I've started working with FPC again after a VERY long hiatus (like 15+
years!) and the application I'm working on uses TObjectCollection from
the Generics.Collection unit.
When compiling I get the following warnings from generics.dictionaries
and I was wondering why that is happening - I'd have thought that "base"
units would always compile cleanly. I know I can filter them out in
Lazarus, but I would rather not if it can be avoided on the assumption
that warnings are warnings for a *reason*. :)
Thanks!
g.
generics.dictionaries.inc(191,92) Warning: Constructing a class
"TCustomDictionaryEnumerator$4$crcA343985C" with abstract method
"DoMoveNext"
generics.collections.pas(121,14) Hint: Found abstract method:
DoMoveNext(<TEnumerator$1$crc009C9A55>):Boolean;
generics.dictionaries.inc(191,92) Warning: Constructing a class
"TCustomDictionaryEnumerator$4$crcA343985C" with abstract method
"GetCurrent"
generics.dictionariesh.inc(119,14) Hint: Found abstract method:
GetCurrent(<TCustomDictionaryEnumerator$4$crcA343985C>):TObject;
generics.dictionaries.inc(191,92) Warning: Constructing a class
"TCustomDictionaryEnumerator$4$crcD6053DC4" with abstract method
"DoMoveNext"
generics.collections.pas(121,14) Hint: Found abstract method:
DoMoveNext(<TEnumerator$1$crc6824777A>):Boolean;
generics.dictionaries.inc(191,92) Warning: Constructing a class
"TCustomDictionaryEnumerator$4$crcD6053DC4" with abstract method
"GetCurrent"
generics.dictionariesh.inc(119,14) Hint: Found abstract method:
GetCurrent(<TCustomDictionaryEnumerator$4$crcD6053DC4>;<var
AnsiString>):AnsiString;
generics.collections.pas(144,52) Note: Private type
"TCustomPointersEnumerator$2<SYSTEM.AnsiString,BBS_SESSION.TCustomList$1$crc6824777A.PT>.T"
never used
generics.collections.pas(144,52) Note: Private type
"TCustomPointersEnumerator$2<SYSTEM.TObject,BBS_SESSION.TCustomList$1$crc009C9A55.PT>.T"
never used
generics.collections.pas(144,52) Note: Private type
"TCustomPointersEnumerator$2<BBS_SESSION.TPair$2<SYSTEM.AnsiString,SYSTEM.TObject>,BBS_SESSION.TCustomList$1$crcBDF2BF71.PT>.T"
never used
generics.dictionaries.inc(191,92) Warning: Constructing a class
"TCustomDictionaryEnumerator$4$crcA343985C" with abstract method
"DoMoveNext"
generics.collections.pas(121,14) Hint: Found abstract method:
DoMoveNext(<TEnumerator$1$crc009C9A55>):Boolean;
generics.dictionaries.inc(191,92) Warning: Constructing a class
"TCustomDictionaryEnumerator$4$crcA343985C" with abstract method
"GetCurrent"
generics.dictionariesh.inc(119,14) Hint: Found abstract method:
GetCurrent(<TCustomDictionaryEnumerator$4$crcA343985C>):TObject;
generics.dictionaries.inc(191,92) Warning: Constructing a class
"TCustomDictionaryEnumerator$4$crcD6053DC4" with abstract method
"DoMoveNext"
generics.collections.pas(121,14) Hint: Found abstract method:
DoMoveNext(<TEnumerator$1$crc6824777A>):Boolean;
generics.dictionaries.inc(191,92) Warning: Constructing a class
"TCustomDictionaryEnumerator$4$crcD6053DC4" with abstract method
"GetCurrent"
generics.dictionariesh.inc(119,14) Hint: Found abstract method:
GetCurrent(<TCustomDictionaryEnumerator$4$crcD6053DC4>;<var
AnsiString>):AnsiString;
generics.collections.pas(144,52) Note: Private type
"TCustomPointersEnumerator$2<SYSTEM.AnsiString,TELNETHOST.TCustomList$1$crc6824777A.PT>.T"
never used
generics.collections.pas(144,52) Note: Private type
"TCustomPointersEnumerator$2<SYSTEM.TObject,TELNETHOST.TCustomList$1$crc009C9A55.PT>.T"
never used
generics.collections.pas(144,52) Note: Private type
"TCustomPointersEnumerator$2<TELNETHOST.TPair$2<SYSTEM.AnsiString,SYSTEM.TObject>,TELNETHOST.TCustomList$1$crc68ACD26F.PT>.T"
never used
generics.dictionaries.inc(191,92) Warning: Constructing a class
"TCustomDictionaryEnumerator$4$crcA343985C" with abstract method
"DoMoveNext"
generics.collections.pas(121,14) Hint: Found abstract method:
DoMoveNext(<TEnumerator$1$crc009C9A55>):Boolean;
generics.dictionaries.inc(191,92) Warning: Constructing a class
"TCustomDictionaryEnumerator$4$crcA343985C" with abstract method
"GetCurrent"
generics.dictionariesh.inc(119,14) Hint: Found abstract method:
GetCurrent(<TCustomDictionaryEnumerator$4$crcA343985C>):TObject;
generics.dictionaries.inc(191,92) Warning: Constructing a class
"TCustomDictionaryEnumerator$4$crcD6053DC4" with abstract method
"DoMoveNext"
generics.collections.pas(121,14) Hint: Found abstract method:
DoMoveNext(<TEnumerator$1$crc6824777A>):Boolean;
generics.dictionaries.inc(191,92) Warning: Constructing a class
"TCustomDictionaryEnumerator$4$crcD6053DC4" with abstract method
"GetCurrent"
generics.dictionariesh.inc(119,14) Hint: Found abstract method:
GetCurrent(<TCustomDictionaryEnumerator$4$crcD6053DC4>;<var
AnsiString>):AnsiString;
generics.collections.pas(144,52) Note: Private type
"TCustomPointersEnumerator$2<SYSTEM.AnsiString,SSHHOST.TCustomList$1$crc6824777A.PT>.T"
never used
generics.collections.pas(144,52) Note: Private type
"TCustomPointersEnumerator$2<SYSTEM.TObject,SSHHOST.TCustomList$1$crc009C9A55.PT>.T"
never used
generics.collections.pas(144,52) Note: Private type
"TCustomPointersEnumerator$2<SSHHOST.TPair$2<SYSTEM.AnsiString,SYSTEM.TObject>,SSHHOST.TCustomList$1$crc7C7C60B1.PT>.T"
never used
generics.dictionaries.inc(191,92) Warning: Constructing a class
"TCustomDictionaryEnumerator$4$crcA343985C" with abstract method
"DoMoveNext"
generics.collections.pas(121,14) Hint: Found abstract method:
DoMoveNext(<TEnumerator$1$crc009C9A55>):Boolean;
generics.dictionaries.inc(191,92) Warning: Constructing a class
"TCustomDictionaryEnumerator$4$crcA343985C" with abstract method
"GetCurrent"
generics.dictionariesh.inc(119,14) Hint: Found abstract method:
GetCurrent(<TCustomDictionaryEnumerator$4$crcA343985C>):TObject;
generics.dictionaries.inc(191,92) Warning: Constructing a class
"TCustomDictionaryEnumerator$4$crcD6053DC4" with abstract method
"DoMoveNext"
generics.collections.pas(121,14) Hint: Found abstract method:
DoMoveNext(<TEnumerator$1$crc6824777A>):Boolean;
generics.dictionaries.inc(191,92) Warning: Constructing a class
"TCustomDictionaryEnumerator$4$crcD6053DC4" with abstract method
"GetCurrent"
generics.dictionariesh.inc(119,14) Hint: Found abstract method:
GetCurrent(<TCustomDictionaryEnumerator$4$crcD6053DC4>;<var
AnsiString>):AnsiString;
generics.collections.pas(144,52) Note: Private type
"TCustomPointersEnumerator$2<SYSTEM.AnsiString,BBS_MAIN.TCustomList$1$crc6824777A.PT>.T"
never used
generics.collections.pas(144,52) Note: Private type
"TCustomPointersEnumerator$2<SYSTEM.TObject,BBS_MAIN.TCustomList$1$crc009C9A55.PT>.T"
never used
generics.collections.pas(144,52) Note: Private type
"TCustomPointersEnumerator$2<BBS_MAIN.TPair$2<SYSTEM.AnsiString,SYSTEM.TObject>,BBS_MAIN.TCustomList$1$crcE0B4E8C7.PT>.T"
never used
--
Proud owner of F-15C 80-0007
http://www.f15sim.com - The only one of its kind.
http://www.diy-cockpits.org/coll - Go Collimated or Go Home.
I'm not crazy, I'm plausibly off-nominal!
ScarletDME - The red hot Data Management Environment
A Multi-Value database for the masses, not the classes.
https://github.com/geneb/ScarletDME - Get it _today_!
_______________________________________________
fpc-pascal maillist - [email protected]
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal