escape-string ( str -- str' )


Vocabulary
ini-file.private

Inputs
stran object


Outputs
str'an object


Definition


: escape-string ( str -- str' )
[
[
H{
{ 0 "\\0" }
{ 34 "\\\"" }
{ 35 "\\#" }
{ 7 "\\a" }
{ 8 "\\v" }
{ 9 "\\t" }
{ 10 "\\n" }
{ 12 "\\f" }
{ 13 "\\r" }
{ 39 "\\'" }
{ 61 "\\=" }
{ 58 "\\:" }
{ 59 "\\;" }
{ 92 "\\\\" }
{ 93 "\\]" }
{ 91 "\\[" }
{ 63 "\\?" }
} ?at [ % ] [ , ] if
] each
] "" make ;