From 311ec702a78c9e2ba35e66c77e53748e8e751f8d Mon Sep 17 00:00:00 2001 From: Ben Gamari Date: Tue, 9 Jul 2019 14:49:32 -0400 Subject: Revert "Add support for SIMD operations in the NCG" Unfortunately this will require more work; register allocation is quite broken. This reverts commit acd795583625401c5554f8e04ec7efca18814011. --- testsuite/tests/codeGen/should_run/simd000.hs | 21 --------------------- 1 file changed, 21 deletions(-) delete mode 100644 testsuite/tests/codeGen/should_run/simd000.hs (limited to 'testsuite/tests/codeGen/should_run/simd000.hs') diff --git a/testsuite/tests/codeGen/should_run/simd000.hs b/testsuite/tests/codeGen/should_run/simd000.hs deleted file mode 100644 index 47d69497c0..0000000000 --- a/testsuite/tests/codeGen/should_run/simd000.hs +++ /dev/null @@ -1,21 +0,0 @@ -{-# OPTIONS_GHC -mavx #-} -{-# OPTIONS_GHC -msse4 #-} -{-# LANGUAGE MagicHash #-} -{-# LANGUAGE UnboxedTuples #-} --- !!! test broadcasting, packing and unpacking for vector types - -import GHC.Exts - -main :: IO () -main = do - -- FloatX4# - case unpackFloatX4# (broadcastFloatX4# 1.5#) of - (# a, b, c, d #) -> print (F# a, F# b, F# c, F# d) - case unpackFloatX4# (packFloatX4# (# 4.5#,7.8#, 2.3#, 6.5# #)) of - (# a, b, c, d #) -> print (F# a, F# b, F# c, F# d) - - -- DoubleX2# - case unpackDoubleX2# (broadcastDoubleX2# 6.5##) of - (# a, b #) -> print (D# a, D# b) - case unpackDoubleX2# (packDoubleX2# (# 8.9##,7.2## #)) of - (# a, b #) -> print (D# a, D# b) -- cgit v1.2.1