mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-02 19:43:15 +01:00
* fixed errno setting in mt sparc/linux mt programs
This commit is contained in:
parent
9ea192f640
commit
71c7fc8a7a
@ -36,7 +36,6 @@ begin
|
||||
case sig of
|
||||
SIGFPE :
|
||||
begin
|
||||
{ don't know how to find the different causes, maybe via xer? }
|
||||
res := 207;
|
||||
case siginfo^.si_code of
|
||||
FPE_INTDIV:
|
||||
@ -70,7 +69,10 @@ end;
|
||||
|
||||
{
|
||||
$Log$
|
||||
Revision 1.4 2004-08-04 19:27:10 florian
|
||||
Revision 1.5 2004-11-06 22:48:16 florian
|
||||
* fixed errno setting in mt sparc/linux mt programs
|
||||
|
||||
Revision 1.4 2004/08/04 19:27:10 florian
|
||||
* fixed floating point and integer exception handling on sparc/linux
|
||||
|
||||
Revision 1.3 2004/05/31 20:25:04 peter
|
||||
|
||||
@ -44,6 +44,7 @@ asm
|
||||
ld [%o3],%o4
|
||||
or %o0,%lo(Errno),%o0
|
||||
call %o4
|
||||
nop
|
||||
.LNoThread:
|
||||
st %o0,[%o2]
|
||||
ba .LReturn
|
||||
@ -85,6 +86,7 @@ asm
|
||||
ld [%o3],%o1
|
||||
or %o0,%lo(Errno),%o0
|
||||
call %o1
|
||||
nop
|
||||
.LNoThread:
|
||||
st %o0,[%o2]
|
||||
mov -1,%o0
|
||||
@ -118,6 +120,7 @@ asm
|
||||
ld [%o3],%o1
|
||||
or %o0,%lo(Errno),%o0
|
||||
call %o1
|
||||
nop
|
||||
.LNoThread:
|
||||
st %o0,[%o2]
|
||||
mov -1,%o0
|
||||
@ -152,6 +155,7 @@ asm
|
||||
ld [%o3],%o1
|
||||
or %o0,%lo(Errno),%o0
|
||||
call %o1
|
||||
nop
|
||||
.LNoThread:
|
||||
st %o0,[%o2]
|
||||
mov -1,%o0
|
||||
@ -187,6 +191,7 @@ asm
|
||||
ld [%o3],%o1
|
||||
or %o0,%lo(Errno),%o0
|
||||
call %o1
|
||||
nop
|
||||
.LNoThread:
|
||||
st %o0,[%o2]
|
||||
mov -1,%o0
|
||||
@ -223,6 +228,7 @@ asm
|
||||
ld [%o3],%o1
|
||||
or %o0,%lo(Errno),%o0
|
||||
call %o1
|
||||
nop
|
||||
.LNoThread:
|
||||
st %o0,[%o2]
|
||||
mov -1,%o0
|
||||
@ -260,6 +266,7 @@ asm
|
||||
ld [%o3],%o1
|
||||
or %o0,%lo(Errno),%o0
|
||||
call %o1
|
||||
nop
|
||||
.LNoThread:
|
||||
st %o0,[%o2]
|
||||
mov -1,%o0
|
||||
@ -298,6 +305,7 @@ asm
|
||||
ld [%o3],%o1
|
||||
or %o0,%lo(Errno),%o0
|
||||
call %o1
|
||||
nop
|
||||
.LNoThread:
|
||||
st %o0,[%o2]
|
||||
mov -1,%o0
|
||||
@ -308,7 +316,10 @@ end;
|
||||
|
||||
{
|
||||
$Log$
|
||||
Revision 1.14 2004-08-22 12:34:11 florian
|
||||
Revision 1.15 2004-11-06 22:48:16 florian
|
||||
* fixed errno setting in mt sparc/linux mt programs
|
||||
|
||||
Revision 1.14 2004/08/22 12:34:11 florian
|
||||
* fixed fork for sparc
|
||||
|
||||
Revision 1.13 2004/07/02 19:29:19 peter
|
||||
|
||||
Loading…
Reference in New Issue
Block a user