Browse Source

* write nil entry after last entry to vmt table so the size of the vmt can be determined

florian 21 years ago
parent
commit
1943e6a5ab
1 changed files with 5 additions and 1 deletions
  1. 5 1
      compiler/nobj.pas

+ 5 - 1
compiler/nobj.pas

@@ -1357,6 +1357,7 @@ implementation
           end;
           end;
          { write virtual methods }
          { write virtual methods }
          writevirtualmethods(dataSegment);
          writevirtualmethods(dataSegment);
+         datasegment.concat(Tai_const.create(ait_const_ptr,0));
          { write the size of the VMT }
          { write the size of the VMT }
          dataSegment.concat(Tai_symbol_end.Createname(_class.vmt_mangledname));
          dataSegment.concat(Tai_symbol_end.Createname(_class.vmt_mangledname));
       end;
       end;
@@ -1400,7 +1401,10 @@ initialization
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.82  2004-11-17 22:21:35  peter
+  Revision 1.83  2004-11-20 14:39:27  florian
+    * write nil entry after last entry to vmt table so the size of the vmt can be determined
+
+  Revision 1.82  2004/11/17 22:21:35  peter
   mangledname setting moved to place after the complete proc declaration is read
   mangledname setting moved to place after the complete proc declaration is read
   import generation moved to place where body is also parsed (still gives problems with win32)
   import generation moved to place where body is also parsed (still gives problems with win32)