suzanne.soy/hyper-literate
1
0
Fork 0
Code Issues 4 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

Two bugfixes.

Browse Source 
* Fix contract on `with-writer`.

* The default writer is initially `write-string`, not `display`.
This commit is contained in:
Eli Barzilay 2015-05-08 02:29:32 -04:00 committed by Matthew Flatt
parent c84c1cf6cc
commit 117218dc3e
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
scribble-doc/scribblings/scribble/text.scrbl
View File

@ -1239,7 +1239,7 @@ Outputs values to @racket[port] as follows for each kind of @racket[v]:
@tech/r{characters}: converts the value to a string along the
same lines as @racket[display], and then passes the string to
the @deftech{current writer}, which is initially
@racket[display]}
@racket[write-string]}
@item{@|void-const|, @racket[#f], or @racket[null]: no output}

2
scribble-text-lib/scribble/text/output.rkt
View File

@ -273,7 +273,7 @@
(define/provide-special (restore-prefix))
(define/provide-special (add-prefix [pfx (or/c string? exact-nonnegative-integer?)]))
(define/provide-special (set-prefix [pfx (or/c string? exact-nonnegative-integer?)]))
(define/provide-special (with-writer [writer (or/c #f (->* (string? output-port?) (exact-nonnegative-integer?) any/c))]))
(define/provide-special (with-writer [writer (or/c #f (->* (string? output-port?) (exact-nonnegative-integer? exact-nonnegative-integer?) any/c))]))
#; ; no need for this hack yet
(define/provide-special (with-writer-change writer))