paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-22 22:49:37 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed program exitcode after change of operatingsystem_result from

Browse Source 
word to longint

git-svn-id: trunk@7473 -
This commit is contained in:
Jonas Maebe 2007-05-25 13:07:23 +00:00
parent a767e89a5b
commit cc03eacd2a
3 changed files with 0 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
rtl/linux/sparc/cprt0.as
View File

@ -66,9 +66,6 @@ _start:
.type _haltproc,@function
_haltproc:
mov 1, %g1 /* "exit" system call */
sethi %hi(operatingsystem_result),%o0
or %o0,%lo(operatingsystem_result),%o0
ldsh [%o0], %o0 /* give exit status to parent process*/
ta 0x10 /* dot the system call */
nop /* delay slot */
/* Die very horribly if exit returns. */

3
rtl/linux/sparc/gprt0.as
View File

@ -87,9 +87,6 @@ _start:
.type _haltproc,@function
_haltproc:
mov 1, %g1 /* "exit" system call */
sethi %hi(operatingsystem_result),%o0
or %o0,%lo(operatingsystem_result),%o0
ldsh [%o0], %o0 /* give exit status to parent process*/
ta 0x10 /* dot the system call */
nop /* delay slot */
/* Die very horribly if exit returns. */

3
rtl/linux/sparc/prt0.as
View File

@ -62,9 +62,6 @@ _start:
.type _haltproc,@function
_haltproc:
mov 1, %g1 /* "exit" system call */
sethi %hi(operatingsystem_result),%o0
or %o0,%lo(operatingsystem_result),%o0
ldsh [%o0], %o0 /* give exit status to parent process*/
ta 0x10 /* dot the system call */
nop /* delay slot */
/* Die very horribly if exit returns. */