final-literals ( quot -- seq )


Vocabulary
compiler.test

Inputs
quotan object


Outputs
seqan object


Definition
USING: accessors sequences ;

IN: compiler.test

: final-literals ( quot -- seq ) final-info [ literal>> ] map ;