فهرست منبع

bugfix, inherited reset was not called

git-svn-id: trunk@1724 -
olle 20 سال پیش
والد
کامیت
5bf628a72e
1فایلهای تغییر یافته به همراه1 افزوده شده و 0 حذف شده
  1. 1 0
      compiler/symdef.pas

+ 1 - 0
compiler/symdef.pas

@@ -2638,6 +2638,7 @@ implementation
 
     procedure tabstractrecorddef.reset;
       begin
+        inherited reset;
         tstoredsymtable(symtable).reset_all_defs;
       end;