diff --git a/basis/math/vectors/simd/simd.factor b/basis/math/vectors/simd/simd.factor index 532e1a2232..84dfce065e 100644 --- a/basis/math/vectors/simd/simd.factor +++ b/basis/math/vectors/simd/simd.factor @@ -87,8 +87,8 @@ PRIVATE> PRIVATE> -: alien-vector ( c-ptr n rep -- value ) \ alien-vector bad-simd-call ; -: set-alien-vector ( c-ptr n rep -- value ) \ set-alien-vector bad-simd-call ; +: alien-vector ( c-ptr n rep -- value ) \ alien-vector bad-simd-call ; +: set-alien-vector ( value c-ptr n rep -- ) \ set-alien-vector bad-simd-call ;