if-box? ( box quot: ( value -- ) -- )


Vocabulary
boxes

Inputs
boxan object
quota quotation with stack effect ( value -- )


Outputs
None

Definition


: if-box? ( box quot: ( value -- ) -- )
[ ?box ] dip [ drop ] if ; inline