Przeglądaj źródła

* set the correct symtable level for the invoke procdef

Sven/Sarah Barth 3 lat temu
rodzic
commit
dadc10658c
1 zmienionych plików z 2 dodań i 0 usunięć
  1. 2 0
      compiler/procdefutil.pas

+ 2 - 0
compiler/procdefutil.pas

@@ -317,6 +317,8 @@ implementation
       invokedef.struct:=result;
       invokedef.visibility:=vis_public;
       invokedef.procsym:=cprocsym.create(method_name_funcref_invoke_decl);
+      invokedef.parast.symtablelevel:=normal_function_level;
+      invokedef.localst.symtablelevel:=normal_function_level;
       include(invokedef.procoptions,po_virtualmethod);
       exclude(invokedef.procoptions,po_staticmethod);
       exclude(invokedef.procoptions,po_classmethod);