suzanne.soy/racket-udelim
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix string example in docs...

Browse Source
This commit is contained in:
William G Hatch 2016-09-24 14:43:13 -06:00
parent 057f106167
commit 4a75b8a99b
1 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
udelim/udelim.scrbl
View File

@ -71,8 +71,10 @@ In addition to simply being a nice additional option to make literal strings, it
(require udelim)
(parameterize ([current-readtable (make-string-delim-readtable #\« #\»)])
(read
(open-input-string
"«this is a string with nested «string delimiters.» No \n escape interpreting.»")))]
(open-input-string #<<EOS
«this is a string with nested «string delimiters.» No \n escape interpreting.»
EOS
)))]
}
@defproc[(make-string-delim-readtable/wrap
@ -88,8 +90,10 @@ Like @racket[make-string-delim-readtable], except that the result will be wrappe
(parameterize ([current-readtable
(make-string-delim-readtable/wrap #\« #\» '#%guillemets)])
(read
(open-input-string
"«this is a string with nested «string delimiters.» No \n escape interpreting.»")))]
(open-input-string #<<EOS
«this is a string with nested «string delimiters.» No \n escape interpreting.»
EOS
)))]
}
@defproc[(stx-string->port [stx syntax?]) input-port?]{