summaryrefslogtreecommitdiff
path: root/rtl/powerpc
diff options
context:
space:
mode:
authorjonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2>2010-11-14 16:00:25 +0000
committerjonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2>2010-11-14 16:00:25 +0000
commit3b2ae45a6dfabc4117923c0612b4f8a20eb0d867 (patch)
tree07835686b6fb490a10f6c9fabe3e6ad0cca26270 /rtl/powerpc
parentf3be2cb03c00897a358acb195024ee3307559696 (diff)
downloadfpc-3b2ae45a6dfabc4117923c0612b4f8a20eb0d867.tar.gz
* don't change the fpu control word in the initialisation code of dynamic
libraries (mantis #16263, #16801) git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@16347 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'rtl/powerpc')
-rw-r--r--rtl/powerpc/powerpc.inc4
1 files changed, 3 insertions, 1 deletions
diff --git a/rtl/powerpc/powerpc.inc b/rtl/powerpc/powerpc.inc
index 49d0a7dd25..5686bf3730 100644
--- a/rtl/powerpc/powerpc.inc
+++ b/rtl/powerpc/powerpc.inc
@@ -56,7 +56,9 @@ end;
procedure fpc_cpuinit;
begin
- fpc_enable_ppc_fpu_exceptions;
+ { don't let libraries influence the FPU cw set by the host program }
+ if not IsLibrary then
+ fpc_enable_ppc_fpu_exceptions;
end;