quote-string ( str -- str' )

Vocabulary

graphviz.dot.private

Inputs

str

an object

Outputs

str'

an object

Definition

USING: sequences splitting ;

IN: graphviz.dot.private

: quote-string ( str -- str' )
    { { "\"" "\\\"" } { "\0" "" } } [ first2 replace ] each
    "\"" "\"" surround ;