assert-not= ( obj1 obj2 -- )

Vocabulary

euler.operators

Inputs

obj1	an object
obj2	an object

Outputs

None

Definition

USING: kernel ;

IN: euler.operators

: assert-not= ( obj1 obj2 -- )
    2dup eq? [ should-not-be-equal ] [ 2drop ] if ;