From 8ddcb34e60d63a85c93a845c968d5bfb89816b97 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sun, 29 Nov 2020 21:21:34 +0000
Subject: [PATCH]   * fix test for x86_64 targets using the SysV abi

git-svn-id: trunk@47638 -
---
 tests/webtbs/tw29957.pp | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/tests/webtbs/tw29957.pp b/tests/webtbs/tw29957.pp
index 7f39695e74..bf7a60794e 100644
--- a/tests/webtbs/tw29957.pp
+++ b/tests/webtbs/tw29957.pp
@@ -45,8 +45,13 @@ type
 
  function _VectorDotProductAVX(Vector1, Vector2: TVector4): Single; assembler;
  asm
+{$if defined(cpux86_64) and not(defined(win64))}
+   VMOVLHPS XMM0,XMM0,XMM1
+   VMOVLHPS XMM1,XMM2,XMM3
+{$else defined(cpux86_64) and not(defined(win64))}
    VMOVUPS XMM0, [Vector1]
    VMOVUPS XMM1, [Vector2]
+{$endif defined(cpux86_64) and not(defined(win64))}
    VDPPS XMM0, XMM0, XMM1, $71 { Only perform calculations on the X, Y and Z coordinates; only store result in the first element }
    VMOVSS Result, XMM0 { Store result - first element of XMM0 }
  end;