call-under ( quot object -- quot )


Vocabulary
xml.private

Inputs
quotan object
objectan object


Outputs
quotan object


Definition
USING: kernel ;

IN: xml.private

: call-under ( quot object -- quot ) swap [ call ] keep ; inline