available-report-section ( quot: ( -- xml ) -- xml/f )

Vocabulary

mason.report

Inputs

quot	a quotation with stack effect ( -- xml )

Outputs

xml/f

an object

Definition

USING: combinators continuations kernel ;

IN: mason.report

: available-report-section ( quot: ( -- xml ) -- xml/f )
    '[ _ ( -- xml ) call-effect ] [ drop f ] recover ;