Browse Source

* fix virtual without constructor warning for forward classes

git-svn-id: trunk@12253 -
peter 16 năm trước cách đây
mục cha
commit
570ffacb92
1 tập tin đã thay đổi với 2 bổ sung0 xóa
  1. 2 0
      compiler/pdecobj.pas

+ 2 - 0
compiler/pdecobj.pas

@@ -720,7 +720,9 @@ implementation
            ) then
           current_objectdef.insertvmt;
 
+        { for implemented classes with a vmt check if there is a constructor }
         if (oo_has_vmt in current_objectdef.objectoptions) and
+           not(oo_is_forward in current_objectdef.objectoptions) and
            not(oo_has_constructor in current_objectdef.objectoptions) then
           Message1(parser_w_virtual_without_constructor,current_objectdef.objrealname^);