LOGIC-VAR? ( object -- ? )

Vocabulary

logic.private

Inputs and outputs

object	an object
?	a boolean

Word description

Tests if the object is an instance of the LOGIC-VAR class.

Definition

USING: kernel ;

IN: logic.private

: LOGIC-VAR? ( object -- ? )
    dup ANONYMOUSE-LOGIC-VAR?
    [ drop t ] [ NORMAL-LOGIC-VAR? ] if ;