define-variant-class-members ( class members -- )

Vocabulary

variants

Inputs

class	an object
members	an object

Outputs

None

Definition

USING: kernel sequences ;

IN: variants

: define-variant-class-members ( class members -- )
    [ dup define-variant-class ] dip
    [ define-variant-class-member ] with each ;