浏览代码

* generate export jmps in .text section

peter 20 年之前
父节点
当前提交
ee5cd11877
共有 1 个文件被更改,包括 5 次插入1 次删除
  1. 5 1
      compiler/systems/t_linux.pas

+ 5 - 1
compiler/systems/t_linux.pas

@@ -157,6 +157,7 @@ procedure texportliblinux.generatelib;
 var
   hp2 : texported_item;
 begin
+  new_section(codesegment,sec_code,'',0);
   hp2:=texported_item(current_module._exports.first);
   while assigned(hp2) do
    begin
@@ -578,7 +579,10 @@ end.
 
 {
   $Log$
-  Revision 1.32  2004-12-22 16:32:46  peter
+  Revision 1.33  2005-01-10 15:56:13  peter
+    * generate export jmps in .text section
+
+  Revision 1.32  2004/12/22 16:32:46  peter
     * maybequoted() added
 
   Revision 1.31  2004/12/19 14:03:16  florian