Explorar o código

* use .create_nil_codeptr instead of .create_pint(0) for writing the placeholder
address of implementation field in tobjcrttiwriter.gen_objc_cat_methods

git-svn-id: trunk@34705 -

nickysn %!s(int64=8) %!d(string=hai) anos
pai
achega
501b9481c5
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/objcgutl.pas

+ 1 - 1
compiler/objcgutl.pas

@@ -541,7 +541,7 @@ begin
       tcb.emit_tai(Tai_const.Create_sym(lab),ldef);
       { placeholder for address of implementation? }
       if (abi=oa_nonfragile) then
-        tcb.emit_tai(Tai_const.Create_pint(0),ptruinttype);
+        tcb.emit_tai(Tai_const.Create_nil_codeptr,codeptruinttype);
     end;
   list.concatList(
     tcb.get_final_asmlist(