pdf-stream ( str -- str' )

Vocabulary

pdf.layout

Inputs

str

an object

Outputs

str'

an object

Definition

USING: formatting kernel math sequences ;

IN: pdf.layout

: pdf-stream ( str -- str' )
    [ length 1 + "<<\n/Length %d\n>>" sprintf ]
    [ "\nstream\n" "\nendstream" surround ] bi append ;