make a little more space and stop decoding

(improvements to dd50299)
This commit is contained in:
Robby Findler 2015-11-08 07:56:39 -06:00
parent dd5029947c
commit db464d5ed2

View File

@ -385,18 +385,20 @@ each element in the sequence.
a sequence.
@examples[
(code:comment @#,t{Given a directory tree:})
(code:comment @#,t{})
(code:comment @#,t{ /example})
(code:comment @#,t{ +-- a})
(code:comment @#,t{ | +-- alpha})
(code:comment @#,t{ | +-- apple})
(code:comment @#,t{ |})
(code:comment @#,t{ +-- b})
(code:comment @#,t{ | +-- beta})
(code:comment @#,t{ |})
(code:comment @#,t{ +-- c})
(code:comment @#,t{})
(code:comment "Given a directory tree:")
(code:comment "")
(code:comment " /example")
(code:comment " +-- a")
(code:comment " | |")
(code:comment " | +-- alpha")
(code:comment " | +-- apple")
(code:comment " |")
(code:comment " +-- b")
(code:comment " | |")
(code:comment " | +-- beta")
(code:comment " |")
(code:comment " +-- c")
(code:comment "")
(eval:alts
(parameterize ([current-directory "/example"])
(for ([p (in-directory)])