diff --git a/compiler/objcgutl.pas b/compiler/objcgutl.pas
index beb0325f84..944eb4e12e 100644
--- a/compiler/objcgutl.pas
+++ b/compiler/objcgutl.pas
@@ -1100,7 +1100,6 @@ procedure tobjcrttiwriter_fragile.gen_objc_info_sections(list: tasmlist);
     { version number = 7 (always, both for gcc and clang) }
     tcb.emit_ord_const(7,ptruinttype);
     { sizeof(objc_module): 4 pointer-size entities }
-    list.Concat(Tai_const.Create_pint(sizeof(pint)*4));
     tcb.emit_ord_const(sizeof(pint)*4,ptruinttype);
     { used to be file name, now unused (points to empty string) }
     objcreatestringpoolentry('',sp_objcclassnames,sec_objc_class_names,lab,def);