Yes, I have an CPU SSE2 enabled (AMD Athlon 64 X2 3600+)<br><br><br>I ran fpc test and the output is:<br><br>%fpc teste1.pas<br>Free Pascal Compiler version 2.2.0 [2007/09/02] for i386<br>Copyright (c) 1993-2007 by Florian Klaempfl
<br>Target OS: FreeBSD/ELF for i386<br>Compiling teste1.pas<br>teste1.pas(10,2) Note: Local variable "b" not used<br>Linking teste1<br>41 lines compiled, 1.1 sec<br>1 note(s) issued<br>%./teste1<br>executing sse2 instructions ...
<br>%<br><br><br>Fabio Luis Girardi<br><br><div><span class="gmail_quote">2007/12/12, Den Jean <<a href="mailto:Den.Jean@telenet.be">Den.Jean@telenet.be</a>>:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
On Wednesday 12 December 2007 07:33:15 pm Den Jean wrote:<br>> do you have a sse2 capable processor ?<br><br>compile and run pure pascal (no qt or lazarus) program below to check anyhow<br>(more verbose version of testsse2 of svn/fpctrunk/tests/test/testsse2.pp)
<br><br>{ %OPT=-OaVARMAX=16 -OaVARMIN=16 }<br>{ %CPU=i386 }<br>uses<br>   mmx;<br><br>{ only a small test to see if it works in principle }<br><br>var<br>  b : byte;<br>  q : array[0..15] of byte;<br><br>begin<br>  if is_sse2_cpu then
<br>    begin<br>    writeln('executing sse2 instructions ...');<br>    asm<br>{$ifdef FPC_PIC}<br>       call .LPIC<br>.LPIC:<br>       popl %ecx<br>{$ifdef darwin}<br>       movdqa    %xmm1,%xmm2<br>       movdqa    
q-.LPIC(%ecx),%xmm4<br>       psubq     %xmm1,%xmm2<br>       psubq     q-.LPIC(%ecx),%xmm4<br>{$else darwin}<br>       addl      $_GLOBAL_OFFSET_TABLE_,%ecx<br>       movdqa    %xmm1,%xmm2<br>       movdqa    q@GOT(%ecx),%xmm4
<br>       psubq     %xmm1,%xmm2<br>       psubq     q@GOT(%ecx),%xmm4<br>{$endif darwin}<br>{$else FPC_PIC}<br>       movdqa    %xmm1,%xmm2<br>       movdqa    q,%xmm4<br>       psubq     %xmm1,%xmm2<br>       psubq     q,%xmm4
<br>{$endif FPC_PIC}<br>    end;<br>    end else writeln('not sse2 cpu');<br>end.<br>_______________________________________________<br>fpc-pascal maillist  -  <a href="mailto:fpc-pascal@lists.freepascal.org">fpc-pascal@lists.freepascal.org
</a><br><a href="http://lists.freepascal.org/mailman/listinfo/fpc-pascal">http://lists.freepascal.org/mailman/listinfo/fpc-pascal</a><br></blockquote></div><br>