Browse Source

Merged revisions 1299 via svnmerge from
http://svn.freepascal.org/svn/fpc/trunk

r1299 (florian)
* exit_group isn't available on older linuxes, if exit_group fails, use exit

git-svn-id: branches/fixes_2_0@1300 -

florian 20 năm trước cách đây
mục cha
commit
5ed13fbd8b
1 tập tin đã thay đổi với 3 bổ sung0 xóa
  1. 3 0
      rtl/linux/i386/prt0.as

+ 3 - 0
rtl/linux/i386/prt0.as

@@ -69,6 +69,9 @@ _haltproc2:             # GAS <= 2.15 bug: generates larger jump if a label is e
 	movl    $252,%eax                /* exit_group */
         movzwl  operatingsystem_result,%ebx
         int     $0x80
+        movl    $1,%eax                /* exit */
+        movzwl  operatingsystem_result,%ebx
+        int     $0x80
         jmp     _haltproc2
 
 .data