set-slot ( name -- quot: ( value tuple -- ) )

Vocabulary

slots.macros

Inputs

name

an object

Outputs

quot	a quotation with stack effect ( value tuple -- )

Definition

USING: kernel quotations slots slots.macros.private ;

IN: slots.macros

MACRO: set-slot ( name -- quot: ( value tuple -- ) )
    [ define-slot ] [ writer-word 1quotation ] bi ;