callable? ( object -- ? ) - Factor Documentation

callable? ( object -- ? )

Vocabulary
quotations

Inputs and outputs

object an object

Word description
Tests if the object is an instance of the callable class.

Definition

USING: classes.tuple.private kernel kernel.private slots.private
;

: callable? ( object -- ? )
dup tag 4 eq?
[ drop t ] [
dup
tuple?
[
layout-of
7
slot
dup
\ composed
eq?
[ drop t ]
[ \ curried eq? ]
if
]
[ drop f ]
if
] if ;