     from-element to-element from-type to-type steps check-vpack
 
     from-type to-type to-element unsigned-type?
-    [ [[vpack-unsigned]] ] [ [[vpack-signed]] ] if ;
+    [ ([vpack-unsigned]) ] [ ([vpack-signed]) ] if ;
 
 :: check-vunpack ( from-element to-element from-type to-type steps -- )
     {

        [ from-element unsigned-type? to-element unsigned-type? not and ]
    } 0|| [ from-type to-type bad-vconvert ] when ;

:: [[vpack-unsigned]] ( from-type to-type -- quot )
    from-type new simd-rep
    '[
        [ from-type check-vconvert-type underlying>> ] bi@
        _ (simd-vpack-unsigned) to-type boa
    ] ;

:: [[vpack-signed]] ( from-type to-type -- quot )
    from-type new simd-rep
    '[
        [ from-type check-vconvert-type underlying>> ] bi@

        [ from-element unsigned-type? not to-element unsigned-type? and ]
    } 0|| [ from-type to-type bad-vconvert ] when ;

:: ([vunpack]) ( from-type to-type -- quot )
    from-type new simd-rep
    '[
        from-type check-vconvert-type underlying>> _
