mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-18 17:09:16 +02:00
* exit_group isn't available on older linuxes, if exit_group fails, use exit
git-svn-id: trunk@1299 -
This commit is contained in:
parent
455a4c24fd
commit
91be287119
@ -73,6 +73,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
|
||||
|
Loading…
Reference in New Issue
Block a user