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

* fixed darwin compilation

Browse Source 
git-svn-id: trunk@6310 -
This commit is contained in:
Jonas Maebe 2007-02-02 22:48:02 +00:00
parent 01b23ca896
commit 5ea26c5f5f
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/i386/i386.inc
View File

@ -94,7 +94,7 @@ function mmx_support : boolean;
mmx_support:=false; mmx_support:=false;
end; end;
{$ifndef INTERNALMOVEFILLCHAR} {$if not defined(INTERNALMOVEFILLCHAR) and not defined(Darwin)}
{$define USE_FASTMOVE} {$define USE_FASTMOVE}
{$i fastmove.inc} {$i fastmove.inc}
{$endif INTERNALMOVEFILLCHAR} {$endif INTERNALMOVEFILLCHAR}
@ -1235,7 +1235,9 @@ procedure fpc_cpucodeinit;
has_sse_support:=sse_support; has_sse_support:=sse_support;
has_mmx_support:=mmx_support; has_mmx_support:=mmx_support;
SysResetFPU; SysResetFPU;
{$ifndef darwin}
setup_fastmove; setup_fastmove;
{$endif}
end; end;