char-32

Vocabulary

math.vectors.simd.cords

Definition

USING: math.vectors.simd ;

IN: math.vectors.simd.cords

TUPLE: char-32
    {
        head char-16 read-only initial:
        char-16{ 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }
    } {
        tail char-16 read-only initial:
        char-16{ 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }
    } ; final

Methods

USING: math.vectors.simd.cords prettyprint.custom ;

M: char-32 >pprint-sequence ;


USING: classes generic kernel math.vectors.simd.cords sequences
;

M: char-32 like
    over \ char-32 instance?
    [ drop ] [ M\ char-32 like (call-next-method) ] if ;


USING: kernel math.vectors.simd math.vectors.simd.cords
sequences ;

M: char-32 new-sequence
    2drop 16 char-16 new new-sequence
    16 char-16 new new-sequence \ char-32 boa ;


USING: math.vectors.simd.cords prettyprint.custom ;

M: char-32 pprint* pprint-object ;


USING: kernel math.vectors.simd.cords prettyprint.custom ;

M: char-32 pprint-delims drop \ char-32{ \ } ;