(array-class)-of ( type -- array-type )

Vocabulary

classes.struct.vectored.private

Inputs

type

an object

Outputs

array-type

an object

Definition

USING: accessors kernel sequences specialized-arrays words ;

IN: classes.struct.vectored.private

: (array-class)-of ( type -- array-type )
    [ define-array-vocab ]
    [ name>> "(" "-array)" surround swap lookup-word ] bi ;