Преглед на файлове

* 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 преди 8 години
родител
ревизия
501b9481c5
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  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);
       tcb.emit_tai(Tai_const.Create_sym(lab),ldef);
       { placeholder for address of implementation? }
       { placeholder for address of implementation? }
       if (abi=oa_nonfragile) then
       if (abi=oa_nonfragile) then
-        tcb.emit_tai(Tai_const.Create_pint(0),ptruinttype);
+        tcb.emit_tai(Tai_const.Create_nil_codeptr,codeptruinttype);
     end;
     end;
   list.concatList(
   list.concatList(
     tcb.get_final_asmlist(
     tcb.get_final_asmlist(