(assert-nth-unsafe) ( word -- )

Vocabulary

tools.annotations.assertions

Inputs

word

an object

Outputs

None

Definition

USING: kernel tools.annotations ;

IN: tools.annotations.assertions

: (assert-nth-unsafe) ( word -- )
    dup [ swap '[ _ check-nth-unsafe @ ] ] curry annotate ;