* skip test if CPU does not support SSE2 (similarly to test/tshuffle1.pp)

git-svn-id: trunk@29688 -

tests/tbs/tb0558.pp

@@ -11,6 +11,11 @@ var
  d: double;
  z: TChartZPosition;
 begin
+  if not(has_sse2_support) then
+   begin
+    WriteLn ('CPU does not support SSE2, skipping test...');
+    halt(0);
+   end;
   d:=5.0;
   z:=3;
   d:=d-z;