math.vectors.simd.intrinsics: use <direct-X-array> instead of X-array-cast to construct view over fallback byte-arrays to avoid redundant array size checking
parent
af83a9341c
commit
8d66b14e59
|
@ -59,16 +59,16 @@ SYNTAX: SIMD-INTRINSIC::
|
||||||
|
|
||||||
: [byte>rep-array] ( rep -- class )
|
: [byte>rep-array] ( rep -- class )
|
||||||
{
|
{
|
||||||
{ char-16-rep [ [ char-array-cast ] ] }
|
{ char-16-rep [ [ 16 <direct-char-array> ] ] }
|
||||||
{ uchar-16-rep [ [ uchar-array-cast ] ] }
|
{ uchar-16-rep [ [ 16 <direct-uchar-array> ] ] }
|
||||||
{ short-8-rep [ [ short-array-cast ] ] }
|
{ short-8-rep [ [ 8 <direct-short-array> ] ] }
|
||||||
{ ushort-8-rep [ [ ushort-array-cast ] ] }
|
{ ushort-8-rep [ [ 8 <direct-ushort-array> ] ] }
|
||||||
{ int-4-rep [ [ int-array-cast ] ] }
|
{ int-4-rep [ [ 4 <direct-int-array> ] ] }
|
||||||
{ uint-4-rep [ [ uint-array-cast ] ] }
|
{ uint-4-rep [ [ 4 <direct-uint-array> ] ] }
|
||||||
{ longlong-2-rep [ [ longlong-array-cast ] ] }
|
{ longlong-2-rep [ [ 2 <direct-longlong-array> ] ] }
|
||||||
{ ulonglong-2-rep [ [ ulonglong-array-cast ] ] }
|
{ ulonglong-2-rep [ [ 2 <direct-ulonglong-array> ] ] }
|
||||||
{ float-4-rep [ [ float-array-cast ] ] }
|
{ float-4-rep [ [ 4 <direct-float-array> ] ] }
|
||||||
{ double-2-rep [ [ double-array-cast ] ] }
|
{ double-2-rep [ [ 2 <direct-double-array> ] ] }
|
||||||
} case ; foldable
|
} case ; foldable
|
||||||
|
|
||||||
: [>rep-array] ( rep -- class )
|
: [>rep-array] ( rep -- class )
|
||||||
|
|
Loading…
Reference in New Issue