with-available-uses? ( quot -- ? )


Vocabulary
compiler.cfg.gvn.avail

Inputs
quotan object


Outputs
?an object


Definition
USING: kernel ;

IN: compiler.cfg.gvn.avail

: with-available-uses? ( quot -- ? )
1check [ available-uses? ] [ drop f ] if ; inline