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

* adapted some field names so they correspond to the automatically

Browse Source 
translated headers

git-svn-id: trunk@12530 -
This commit is contained in:
Jonas Maebe 2009-01-08 20:22:50 +00:00
parent 6e1dc583b2
commit 307d9745ed
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
rtl/darwin/arm/sighnd.inc
View File

@ -33,7 +33,7 @@ begin
Else Else
Res:=207; {coprocessor error} Res:=207; {coprocessor error}
end; end;
SigContext^.uc_mcontext^.fs.__fpscr := SigContext^.uc_mcontext^.fs.__fpscr and not($1fff); SigContext^.uc_mcontext^.__fs.__fpscr := SigContext^.uc_mcontext^.__fs.__fpscr and not($1fff);
end; end;
SIGBUS: SIGBUS:
res:=214; res:=214;
@ -48,10 +48,10 @@ begin
{ return to trampoline } { return to trampoline }
if res <> 0 then if res <> 0 then
begin begin
SigContext^.uc_mcontext^.ss.__r[0] := res; SigContext^.uc_mcontext^.__ss.__r[0] := res;
SigContext^.uc_mcontext^.ss.__r[1] := SigContext^.uc_mcontext^.ss.__pc; SigContext^.uc_mcontext^.__ss.__r[1] := SigContext^.uc_mcontext^.__ss.__pc;
SigContext^.uc_mcontext^.ss.__r[2] := SigContext^.uc_mcontext^.ss.__sp; SigContext^.uc_mcontext^.__ss.__r[2] := SigContext^.uc_mcontext^.__ss.__sp;
pointer(SigContext^.uc_mcontext^.ss.__pc) := @HandleErrorAddrFrame; pointer(SigContext^.uc_mcontext^.__ss.__pc) := @HandleErrorAddrFrame;
end; end;
end; end;