USING: assocs ;

IN: cpu.architecture

: widen-vector-rep ( rep -- rep' )
{
{ char-16-rep short-8-rep }
{ short-8-rep int-4-rep }
{ int-4-rep longlong-2-rep }
{ uchar-16-rep ushort-8-rep }
{ ushort-8-rep uint-4-rep }
{ uint-4-rep ulonglong-2-rep }
{ float-4-rep double-2-rep }
} at ; foldable flushable