浏览代码

+ add constants for the Invoke symbol of a function reference interface (both for declaring and finding it)

Sven/Sarah Barth 3 年之前
父节点
当前提交
ec02d0abb0
共有 1 个文件被更改,包括 4 次插入0 次删除
  1. 4 0
      compiler/symconst.pas

+ 4 - 0
compiler/symconst.pas

@@ -160,6 +160,10 @@ const
   { prefix for names of class helper procsyms added to regular symtables }
   { prefix for names of class helper procsyms added to regular symtables }
   class_helper_prefix = 'CH$';
   class_helper_prefix = 'CH$';
 
 
+  { name of the Invoke method of a function reference interface }
+  method_name_funcref_invoke_decl = 'Invoke';
+  method_name_funcref_invoke_find = 'INVOKE';
+
   { tsym.symid value in case the sym has not yet been registered }
   { tsym.symid value in case the sym has not yet been registered }
   symid_not_registered = -2;
   symid_not_registered = -2;
   { tsym.symid value in case the sym has been registered, but not put in a
   { tsym.symid value in case the sym has been registered, but not put in a