From dacfb1a6ff0cc1eb3cbe29ca6f62b93fe51a0b0b Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Sun, 10 Jan 2016 17:22:09 +0000
Subject: [PATCH]   * load an objc classrefdef as objc_idtype, as that is also
 how we type     the self parameter in Objective-C class methods

git-svn-id: trunk@32913 -
---
 compiler/ncgmem.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/ncgmem.pas b/compiler/ncgmem.pas
index a89176158e..c28c8602d6 100644
--- a/compiler/ncgmem.pas
+++ b/compiler/ncgmem.pas
@@ -134,7 +134,7 @@ implementation
                      objcfinishstringrefpoolentry(entry,sp_objcclassnames,sec_objc_cls_refs,sec_objc_class_names);
                    end;
                  reference_reset_symbol(href,tasmlabel(entry^.Data),0,voidpointertype.size);
-                 hlcg.a_load_ref_reg(current_asmdata.CurrAsmList,voidpointertype,voidpointertype,href,location.register);
+                 hlcg.a_load_ref_reg(current_asmdata.CurrAsmList,objc_idtype,objc_idtype,href,location.register);
                end;
            end
          else