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

* first syscall fix

Browse Source
This commit is contained in:
florian 2004-06-30 21:15:51 +00:00
parent 230105093d
commit df63fb46e3
1 changed files with 13 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
rtl/linux/sparc/syscall.inc
View File

@ -134,22 +134,22 @@ asm
ta 0x10 ta 0x10
bcc .LSyscOK3 bcc .LSyscOK3
nop nop
sethi %hi(fpc_threadvar_relocate_proc),%o0 sethi %hi(fpc_threadvar_relocate_proc),%o2
or %o0,%lo(fpc_threadvar_relocate_proc),%o0 or %o2,%lo(fpc_threadvar_relocate_proc),%o2
ld [%o0],%o7 ld [%o2],%o3
subcc %o7,%g0,%g0 subcc %o7,%g0,%g0
bne .LThread3 bne .LThread3
nop nop
sethi %hi(Errno+4),%o0 sethi %hi(Errno+4),%o2
ba .LNoThread3 ba .LNoThread3
or %o0,%lo(Errno+4),%o0 or %o2,%lo(Errno+4),%o2
.LThread3: .LThread3:
sethi %hi(Errno),%o0 sethi %hi(Errno),%o2
ld [%o7],%o1 ld [%o3],%o1
or %o0,%lo(Errno),%o0 or %o2,%lo(Errno),%o2
call %o1 call %o1
.LNoThread3: .LNoThread3:
st %i0,[%o0] st %o0,[%o2]
mov -1,%o0 mov -1,%o0
.LSyscOK3: .LSyscOK3:
mov %o0,%i0 mov %o0,%i0
@ -269,7 +269,10 @@ end;
{ {
$Log$ $Log$
Revision 1.11 2004-02-06 23:06:16 florian Revision 1.12 2004-06-30 21:15:51 florian
* first syscall fix
Revision 1.11 2004/02/06 23:06:16 florian
- killed tsyscallregs - killed tsyscallregs
Revision 1.10 2004/01/05 17:22:03 peter Revision 1.10 2004/01/05 17:22:03 peter
@ -312,4 +315,3 @@ end;
* syscall moved into seperate include * syscall moved into seperate include
} }