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

db4
Joe Groff 2010-05-23 23:18:02 -07:00
parent af83a9341c
commit 8d66b14e59
1 changed files with 10 additions and 10 deletions

View File

@ -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 )