Explorar o código

* don't handle Objective-C or dispinterfaces like Pascal interfaces (we
don't generated a vmtdef for those)

git-svn-id: trunk@32685 -

Jonas Maebe %!s(int64=9) %!d(string=hai) anos
pai
achega
1dcd312ca5
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/llvm/llvmtype.pas

+ 1 - 1
compiler/llvm/llvmtype.pas

@@ -683,7 +683,7 @@ implementation
 
     procedure TLLVMTypeInfo.appenddef_object(list:TAsmList;def: tobjectdef);
       begin
-        if is_any_interface_kind(def) then
+        if is_interface(def) then
           begin
             record_def(def);
             record_def(def.vmt_def);