pdf-text ( lines -- str )


Vocabulary
text-to-pdf.private

Inputs and outputs
linesan object
stran object


Definition


: pdf-text ( lines -- str )
[
"BT" , "54 738 Td" , "/F1 10 Tf" , "12 TL" ,
[ pdf-string "'" append , ] each "ET" ,
] { } make "\n" join pdf-stream ;