Kaynağa Gözat

* 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 12 yıl önce
ebeveyn
işleme
44b141ea1a
1 değiştirilmiş dosya ile 1 ekleme ve 2 silme
  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);