paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-21 00:59:35 +01:00
Code Issues Packages Projects Releases Wiki Activity

+ proper alignment directives added

Browse Source 
git-svn-id: trunk@1564 -
This commit is contained in:
florian 2005-10-22 15:40:51 +00:00
parent 11e087e212
commit ef72bba537
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
tests/test/testsse2.pp
View File

@ -1,12 +1,13 @@
{ %OPT=-OaVARMAX=16 -OaVARMIN=16 }
{ %CPU=i386 } { %CPU=i386 }
{ %version=1.1}
uses uses
mmx; mmx;
{ only a small test to see if it works in principal } { only a small test to see if it works in principal }
var var
q : array[0..15] of byte; b : byte;
q : array[0..15] of byte;
begin begin
if is_sse2_cpu then if is_sse2_cpu then