pinned-alien? ( object -- ? )

Vocabulary

alien

Inputs and outputs

object	an object
?	a boolean

Word description

Tests if the object is an instance of the pinned-alien class.

Definition

USING: accessors kernel ;

IN: alien

: pinned-alien? ( object -- ? )
    dup alien? [ underlying>> not ] [ drop f ] if ;