Ver Fonte

* also load the methodpointer type for managed VM types. It's required
now that there is no special assigned handling anymore, because the
generic "<>nil" code for method pointers loads the "proc" field
via an internally generated tmethod() typecast (using the
methodpointer type). Additionally, not loading this type was
an artefact from the time that it wasn't available yet for the
JVM target

git-svn-id: trunk@25558 -

Jonas Maebe há 12 anos atrás
pai
commit
44b141ea1a
1 ficheiros alterados com 1 adições e 2 exclusões
  1. 1 2
      compiler/psystem.pas

+ 1 - 2
compiler/psystem.pas

@@ -570,8 +570,7 @@ implementation
           end;
         loadtype('variant',cvarianttype);
         loadtype('olevariant',colevarianttype);
-        if not(target_info.system in systems_managed_vm) then
-          loadtype('methodpointer',methodpointertype);
+        loadtype('methodpointer',methodpointertype);
         loadtype('HRESULT',hresultdef);
         set_default_int_types;
         set_current_module(oldcurrentmodule);