math.vectors.simd: ensure that set-alien-vector is open-coded in the actual set-nth-unsafe method on SIMD specialized arrays, not just inlined instances

db4
Slava Pestov 2009-12-05 18:20:57 -05:00
parent 9705768e3f
commit abe72ae7ae
1 changed files with 6 additions and 1 deletions

View File

@ -9,6 +9,8 @@ IN: math.vectors.simd
ERROR: bad-simd-length got expected ;
ERROR: bad-simd-vector obj ;
<<
<PRIVATE
! Primitive SIMD constructors
@ -236,7 +238,10 @@ c:<c-type>
byte-array >>class
A >>boxed-class
{ A-rep alien-vector A boa } >quotation >>getter
{ [ underlying>> ] 2dip A-rep set-alien-vector } >quotation >>setter
{
[ dup simd-128? [ bad-simd-vector ] unless underlying>> ] 2dip
A-rep set-alien-vector
} >quotation >>setter
16 >>size
16 >>align
A-rep >>rep