math.vectors.simd: Attempt to print out full simd failures so we can debug them.

diff --git a/basis/math/vectors/simd/simd-tests.factor b/basis/math/vectors/simd/simd-tests.factor
index 5da775dc24e5ae3fe1a5d6897e93ad5073ed2e02..015792a20c9b4c61ff6a2bbd44d6f7894362257c 100644 (file)
--- a/basis/math/vectors/simd/simd-tests.factor
+++ b/basis/math/vectors/simd/simd-tests.factor
@@ -172,7 +172,9 @@ TUPLE: simd-test-failure
             input input-quot unoptimized-result optimized-result nonintrinsic-result
             simd-test-failure boa
         ] if
-    ] map sift ; inline
+    ] map sift
+    dup empty? [ dup ... ] unless ! Print full errors
+    ; inline
 
 "== Checking -new constructors" print