Browse Source

+ add flag to denote an object def as a function reference

Sven/Sarah Barth 3 years ago
parent
commit
b28495a423
2 changed files with 4 additions and 2 deletions
  1. 2 1
      compiler/symconst.pas
  2. 2 1
      compiler/utils/ppuutils/ppudump.pp

+ 2 - 1
compiler/symconst.pas

@@ -565,7 +565,8 @@ type
     oo_has_class_constructor, { the object/class has a class constructor }
     oo_has_class_destructor,  { the object/class has a class destructor  }
     oo_is_enum_class,     { the class represents an enum (JVM) }
-    oo_has_new_destructor { the object/class declares a destructor (apart from potentially inherting one from the parent) }
+    oo_has_new_destructor,{ the object/class declares a destructor (apart from potentially inherting one from the parent) }
+    oo_is_funcref         { interface has a single Invoke method that can be directly called }
   );
   tobjectoptions=set of tobjectoption;
 

+ 2 - 1
compiler/utils/ppuutils/ppudump.pp

@@ -3238,7 +3238,8 @@ const
      (mask:oo_has_class_constructor; str:'HasClassConstructor'),
      (mask:oo_has_class_destructor; str:'HasClassDestructor'),
      (mask:oo_is_enum_class;      str:'JvmEnumClass'),
-     (mask:oo_has_new_destructor; str:'HasNewDestructor')
+     (mask:oo_has_new_destructor; str:'HasNewDestructor'),
+     (mask:oo_is_funcref;         str:'IsFuncRef')
   );
 var
   i      : longint;