From c5c94ef1f9003ee4e75d7e37eff3c008d9d13b63 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Sun, 31 Jan 2010 18:19:14 +1300
Subject: [PATCH] compiler.cfg.intrinsics.simd: ignore dummy assert-positive
 word

---
 basis/compiler/cfg/intrinsics/simd/simd.factor | 1 +
 1 file changed, 1 insertion(+)

diff --git a/basis/compiler/cfg/intrinsics/simd/simd.factor b/basis/compiler/cfg/intrinsics/simd/simd.factor
index c75e890c27..0d413f1346 100644
--- a/basis/compiler/cfg/intrinsics/simd/simd.factor
+++ b/basis/compiler/cfg/intrinsics/simd/simd.factor
@@ -663,6 +663,7 @@ PREDICATE: fixnum-vector-rep < int-vector-rep
         { (simd-select)            [ emit-simd-select              ] }
         { alien-vector             [ emit-alien-vector             ] }
         { set-alien-vector         [ emit-set-alien-vector         ] }
+        { assert-positive          [ drop                          ] }
     } enable-intrinsics ;
 
 enable-simd