[fpc-pascal] Lazarus + Qt4 in FreeBSD

[papelhigienico at gmail.com]

I will try disable SSE2 instructions...

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