mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-30 12:20:19 +02:00
* don't generate vmt for a generic
git-svn-id: trunk@5428 -
This commit is contained in:
parent
0d38bda5c4
commit
28c5578976
@ -536,7 +536,8 @@ implementation
|
|||||||
begin
|
begin
|
||||||
{ Build VMT indexes, skip for type renaming and forward classes }
|
{ Build VMT indexes, skip for type renaming and forward classes }
|
||||||
if (hdef.typesym=newtype) and
|
if (hdef.typesym=newtype) and
|
||||||
not(oo_is_forward in tobjectdef(hdef).objectoptions) then
|
not(oo_is_forward in tobjectdef(hdef).objectoptions) and
|
||||||
|
not(df_generic in hdef.defoptions) then
|
||||||
begin
|
begin
|
||||||
vmtbuilder:=TVMTBuilder.Create(tobjectdef(hdef));
|
vmtbuilder:=TVMTBuilder.Create(tobjectdef(hdef));
|
||||||
vmtbuilder.generate_vmt;
|
vmtbuilder.generate_vmt;
|
||||||
|
Loading…
Reference in New Issue
Block a user