check-method-effect ( effect -- )

Vocabulary

generic.parser

Inputs

effect

an object

Outputs

None

Definition

USING: kernel words ;

IN: generic.parser

: check-method-effect ( effect -- )
    last-word generic-effect 2dup method-effect=
    [ 2drop ] [ bad-method-effect ] if ;