math.vectors.simd.intrinsics: fix double-2 vcount

Turns out we use MOVMSKPS for double vectors too. Gotta save that extra instruction byte!
db4
Joe Groff 2011-11-12 23:19:49 -08:00
parent 9a19f82470
commit 32b7dc116f
2 changed files with 3 additions and 3 deletions

View File

@ -266,8 +266,8 @@ SIMD-INTRINSIC: (simd-vany?) ( a rep -- ? ) [ bitor ] bitwise-com
SIMD-INTRINSIC: (simd-vall?) ( a rep -- ? ) [ bitand ] bitwise-components-reduce zero? not ;
SIMD-INTRINSIC: (simd-vnone?) ( a rep -- ? ) [ bitor ] bitwise-components-reduce zero? ;
SIMD-INTRINSIC: (simd-vgetmask) ( a rep -- n )
dup { float-4-rep double-2-rep } member?
[ ((vgetmask)) ] [ drop uchar-16-rep ((vgetmask)) ] if ;
{ float-4-rep double-2-rep } member?
[ uint-4-rep ((vgetmask)) ] [ uchar-16-rep ((vgetmask)) ] if ;
SIMD-INTRINSIC: (simd-v>float) ( a rep -- c )
[ [ >rep-array ] [ rep-length ] bi [ >float ] ]
[ >float-vector-rep <rep-array> ] bi unrolled-map-as-unsafe underlying>> ;

View File

@ -113,7 +113,7 @@ DEFER: simd-construct-op
: mask>count ( n rep -- n' )
[ bit-count ] dip {
{ float-4-rep [ ] }
{ double-2-rep [ ] }
{ double-2-rep [ -1 shift ] }
{ uchar-16-rep [ ] }
{ char-16-rep [ ] }
{ ushort-8-rep [ -1 shift ] }